Replaying scripts

You'll need to add standard script headers and initialize the WWW::Mechanize agent, with something like this:

    #!/usr/bin/perl

    use strict;
    use warnings;
    use WWW::Mechanize;
    use Test::More qw(no_plan);

    my $agent = WWW::Mechanize->new();

continued...