print "$_\n" for map { .=subst(/er/, 'aler', :global) } @w;