Trim() has a well-understood meaning in other languages and I think it would be a misleading to redefine it for Perl. How about scalp()?

--
May the Source be with you.

You said you wanted to be around when I made a mistake; well, this could be it, sweetheart.