Tools for modeling links between files / URLs / etc.
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
 
 

39 lines
516 B

#!/usr/bin/env perl
=pod
=head1 NAME
pieces-show - show details for a marked URI
=head1 SYNOPSIS
pieces-show show details for a given pieces URI
USAGE:
pieces show [address]
=head1 AUTHOR
Brennen Bearnes <bbearnes@gmail.com>
=cut
use strict;
use warnings;
use 5.10.0;
use App::Pieces;
use Getopt::Long;
use Pod::Usage;
GetOptions(
# 'config=s' => \$config_file,
help => sub { pod2usage(0) },
) or pod2usage(2);
my $p = App::Pieces->new();
my $piece_id = $p->get($ARGV[0]);
say $piece_id;