#!ruby -pl s="a" s.succ!while$_[s[/[a-e]*/]] $_=s