11 our $VERSION = '1.01';
14 my $source = readline;
19 my $data = from_json($source);
20 my $update = eval { stat(${^LAST_FH} // $ARGV)->mtime }
21 or warn "Could not determine input time\n";
22 $data->{-date} = Time::Piece->new($update)->datetime;
24 say "# automatically generated by $0";
31 mkcaniuse - Turn Javascript data into an equivalent Perl structure
35 tools/mkcaniuse data.json >browser-support.inc.pl