Select Code to Download

my $url     = 'http://www.perlmonks.org/';
my $content = request_page($url)           or die('...');
my $archive = archive_page($url, $content) or die('...');

#!/usr/bin/perl

use File::Path  qw/ mkpath                  /;
...

       $path;       
}