my $mech = WWW::Mechanize->new(); $mech->get($url); $mech->save_content( "test.pdf", binary => 1 );