# read
use Path::Tiny;
my @words = ( path($filename)->slurp ) =~ /^.+$/gm;