| Subject: | Can't set w on construction of Text::Shingle object |
$ perl -MText::Shingle -e'print Text::Shingle->new( lang => 'de', norm => 1, w => 3)'
In Text/Shingle.pm sub new (line 27)
croak "window size cannot be negative or zero" if $opt eq 'w' && $_{w} < 1;
window size cannot be negative or zero at -e line 1.
In Text/Shingle.pm sub new (line 27)
croak "window size cannot be negative or zero" if $opt eq 'w' && $_{w} < 1;
though %_ is not set, should be $param{w} instead of $_{w}