http://qs1969.pair.com?node_id=839243


in reply to Re: Remove newline character from start of string
in thread Remove newline character from start of string

Or somewhat oddly, 
chomp(substr($str, 0, length($/));

[download]
Caution: Contents may have been coded under pressure.

In Section Seekers of Perl Wisdom