Help for this page
sub findtext { ... } } }
my %input; $input{$_} = undef for @$inputs; # make this a hash ... # word along with "N" words of surrounding context # (left as an exercise...) }