grep( lc $word, @short_sizes )