Select Code to Download

$/ = undef;
open my $fh, '<', 't/mock_html.dat' or die "Can't open datafile";
...
my $crawl = WWW::Crawl->new(
    'timestamp' => 'a',
);