Select Code to Download

    #!/usr/bin/env perl
...
    $mech->eval_in_page('alert("Hello Chrome")');
    my $png= $mech->content_as_png();