Beefy Boxes and Bandwidth Generously Provided by pair Networks
We don't bite newbies here... much
 
PerlMonks  

Re: s/\w/random character/g

by Abigail-II (Bishop)
on Apr 12, 2004 at 21:26 UTC ( #344532=note: print w/ replies, xml ) Need Help??


in reply to Re: Re: s/\w/random character/g
in thread s/\w/random character/g

The no warnings qw/syntax/; line seems unnecessary. Is there a reason for it?
For this program, that line doesn't serve any purpose. But then, neither do the two lines above - yet you aren't inquiring about them. The first six lines are generated whenever I type ^A-P (two chars), and I don't bother to remove the last line if it happens to occur in a program where it's unnecessary.

Trying to answer my own question I did re-implement your solution with simple tied scalars, and found no functional difference,
The fact that the entire word is replaced with identical characters didn't strike you as a functional difference? In this specific case, you could get away with using tied scalars if you also used /e, but if letters had to be replaced with a random letter enclosed in parenthesis, using a tied has would lead to:
s/(\w)/($h{$1})/g;
while you would need something like:
s/(\w)/"($s)"/eg;
which, while it has less characters, is less obvious, IMO.

Abigail


Comment on Re: s/\w/random character/g
Select or Download Code

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others perusing the Monastery: (12)
As of 2014-10-31 12:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (217 votes), past polls