in reply to Arbitrary Levels Of Recursion?

Even easier see tilly's solution in "...perils of porting...".
I took me a while to actually wrap my head around what goes on in that snippet ;)

qq/madams55075.spamtrap.@comcast.net/ =~ s/\.spamtrap\.//;

In Section Seekers of Perl Wisdom