Help for this page

Select Code to Download


  1. or download this
    use strict;
    use warnings;
    ...
      $mech->get( $url, ':content_file' => $filename );
      return -s $filename;
    }
    
  2. or download this
    use strict;
    use warnings;
    ...
    # is($got, $expected, $description_of_test)
    is(getByteCount($mech, $url), $iExpected
       , "getByteCount: url=$url");