No such thing as a small change | |
PerlMonks |
Re: In search of a better way to trim stringby Not_a_Number (Prior) |
on Jul 19, 2004 at 19:21 UTC ( [id://375662]=note: print w/replies, xml ) | Need Help?? |
Sorry if this is a bit late, FWIW... 1) Most of the replies published (well, those that work :-) truncate strings that are exactly of the desired length, while your original version keeps these intact. Test case: my $str = trim_length ( 'this sentence is 30 signs long', 30 );If you use eg BrowserUK's code, this is easy to fix: just change return $str if length $str < $n;to: return $str if length $str <= $n;2) It might be an idea to strip off trailing whitespace, in order to avoid adding ' ...' to the end of a message that is essentially complete. My own solution, again FWIW, would be
dave
In Section
Seekers of Perl Wisdom
|
|