Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options

Re: Re: What is the difference?

by YAFZ (Pilgrim)
on Apr 08, 2003 at 15:05 UTC ( #248962=note: print w/replies, xml ) Need Help??

in reply to Re: What is the difference?
in thread What is the difference?

Thanks for enlightening me! ;-) I prefer your second example. The only problem with that example is that you've forgotten one single slash character at the end of tr:
$line += tr/ \t\r\n/c;
which must be:
$line += tr/ \t\r\n//c;
After fixing that, the sript works cool ;-)

I also realized that I can handle the situation using the command line:
$ tr [:space:] -d < | wc 0 1 69
Now I think that tr (in Perl or in shell) is a better way to get rid of unwanted characters, am I wrong?

P.S.: If Thelonious S. Monk programmed (in any language) woe to the ones who could maintain his code ;-)

Replies are listed 'Best First'.
Re: Re: Re: What is the difference?
by dakkar (Hermit) on Apr 08, 2003 at 18:02 UTC

    Your tr (the program) example does, indeed, get rid of non-whitespace. The Perl program, howver, does not. What it does is: take all characters but some whitespace (those with ASCII codings 32, 9, 13, 10, in order), changing them with themselves, and returning how many have been (non) changed.

    The /c option complements the first list of tr///, while leaving the second list empty makes it equal to the first (in this case, the complemented first). tr/// in any case returns the number of characters interested by the transliteration.

            dakkar - Mobilis in mobile

    Most of my code is tested...

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://248962]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (2)
As of 2023-06-06 06:24 GMT
Find Nodes?
    Voting Booth?
    How often do you go to conferences?

    Results (26 votes). Check out past polls.