Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

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 <ccount.pl | 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?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others chanting in the Monastery: (2)
As of 2022-05-27 22:43 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Do you prefer to work remotely?



    Results (98 votes). Check out past polls.

    Notices?