my @words = qw( s so som some somew somewo somewor someword somewords);