theand · August 22, 2018 03:53
diff --git a/download.pl b/download.pl
 #!/usr/bin/env perl

 use strict;
 use warnings;
 use File::Fetch;

 my $url = $ARGV[0];

 print "downloading  $url\n";

 my $ff = File::Fetch->new(uri => $url);
 my $file = $ff->fetch() or die $ff->error;

 print "done\n";
	#!/usr/bin/env perl

	use strict;
	use warnings;
	use File::Fetch;

	my $url = $ARGV[0];

	print "downloading $url\n";

	my $ff = File::Fetch->new(uri => $url);
	my $file = $ff->fetch() or die $ff->error;

	print "done\n";