my $mech = WWW::Mechanize->new(); print "Accessing $url\n"; $mech->get($url); print "Downloading the file..."; $mech->click_button (value => "TAB"); $mech->save_content( $full_path ); print "Done.\n";