Select Code to Download

<a class="txt" href="file.txt"> Text File </a>

my @links = $mech->find_all_links( text_contains => 'some description 
+etc... ' );
my @urls = map { $_->[0] } @links;

for my $foo (@urls)
{
   my $filename = '/path/'.$foo;
   $mech->get($foo, ':content_file'=>$filename);
}