Select Code to Download

my $mech = WWW::Mechanize->new();
my $response = $mech->get(URL);
...
 else {
     die $response->status_line;
 }

use WWW::mechanize::Firefox;
use Data::Dumper;
...
    }

}