Select Code to Download

#$files[0] = '/usr/local/bin/foobar/a.html'
#$files[1] = '/usr/local/bin/foobar/b.html'
...
#$files[3] = '/usr/local/bin/foobar/d.html'
#$files[4] = '/usr/local/bin/foobar/e.html'
#$files[5] = '/usr/local/bin/foobar/f.html'

$tracker =
<<EOQ;
...
 
$path = "/usr/local/bin/foobar/";

@ttt = split /<br>\n/, $tracker;
 
for (@ttt) {
    print "$_\n";
}

print join ':', split / */, 'hi there';

@files = join split /<br>\n/, $tracker, $path;
 
foreach (@files) {
    print "$_\n"
}