Mtv Europe was too hasty:

> -p @$=a..z;pop@$ while@$>3&&!/@$[-4..-1]/x;$_ x=@$>3

that's better -

-p @$=a..z;pop@$ until@$<4||/@$[-4..-1]/x;$_ x=@$>3

Reply via email to