Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: In search of a better way to trim string

by rrwo (Friar)
on Jul 20, 2004 at 04:12 UTC ( #375792=note: print w/replies, xml ) Need Help??


in reply to In search of a better way to trim string

Hm, there's Text::Truncate:

use Text::Truncate; my $short = truncstr($long, $len);

It may not be the most efficient way to do it, but you don't have to think about how to do it.

Disclaimer: I wrote that module a while ago because I was sick of rewriting a routine to do that all the time. Any ideas for improvements would be appreciated.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://375792]
help
Chatterbox?
[hippo]: Can anybody suggest a scalar value of $x for which ($x && !length $x) is true?
[Corion]: hippo: If you have a Unicode-wise Perl then likely some zero-width characters in $x would work. Maybe $x = "\x{200b}" works.
[Corion]: Hmm - no, that outputs 1 for me on 5.14 - perl -wle "my $x = qq(\x{200b}); warn $x; warn length $x"
[hippo]: Smart - I'll give that a go. Thanks.
[hippo]: Ah

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (8)
As of 2017-07-27 13:24 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    I came, I saw, I ...
























    Results (413 votes). Check out past polls.