Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
executable file 17 lines (14 sloc) 239 Bytes
#!/usr/bin/perl
use strict;
use warnings;
use repo;
use LWP::Simple;
unless ( defined $ARGV[0] ) {
die "Enter Snapshot Timestamp";
}
if ( functions::fetch_package( $ARGV[0] ) ) {
print "Success";
}
else {
print "Fail $!";
}