Help for this page
use strict; use warnings; ... open my $fh, '>', 'mock_html.dat'; print $fh $json_str; close $fh;
use strict; use warnings; ... sub link { diag ($_[0]); }