use strict;
use Lingua::Ispell qw( :all );  # import all symbols
add_word_lc("shrdlu");
for my $r ( spellcheck( "hello hacking perl shrdlu 42" ) ) {
  print "$r->{'type'}: $r->{'term'}\n";
}