The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
use strict;
use warnings;
use utf8;
use Test::More;
use Spellunker;
use Data::Dumper;

BEGIN { $ENV{PERL_SPELLUNKER_NO_USER_DICT} = 1 }

my $spellunker = Spellunker->new();
while (<DATA>) {
    next unless /\S/;
    chomp;
    my @bad = $spellunker->check_line($_);
    isnt(0+@bad, 0, $_);
    note Dumper(\@bad);
}

done_testing;

__DATA__
includs JSON::backportPP instead of JSON::PP.
In Teng, you simply use Teng::Schema's domain specific languaage to define a set of tables
If $table is specified, it set table infomation to result iterator.