Select Code to Download

#!/usr/bin/perl -w
use strict;
...
print "$text\n";
getstore($url, $text) or die "Can't download: $@\n";
}

#!/usr/bin/perl -w
use strict;
...
#$m->content( format => 'text2.txt' );
#print FILE $m;
close FILE;