gimps-review/t/basic.t

13 lines
211 B
Perl

use v5.32.0;
use Test2::V0;
use Path::Tiny;
require './script.pl';
my $input = path('./sample.html')->slurp;
like generate_output_table( extract_first_table($input) )->draw => qr/lonestar/;
done_testing();