Beefy Boxes and Bandwidth Generously Provided by pair Networks Bob
Keep It Simple, Stupid
 
PerlMonks  

Re: what is the translation?

by BrowserUk (Pope)
on Jul 20, 2011 at 03:23 UTC ( #915571=note: print w/ replies, xml ) Need Help??


in reply to what is the translation?

What is the tr/!-~/P-~!-O/ doing?

tr is perl's transliteration function.

It translates the characters in the string it is applied to, according to the two tables of characters given as its arguments.

For $string =~ tr/123/ABC/, it would change any and all occurrences of the characters '1','2', or '3', for the characters 'A', 'B', and 'C' respectively. Ie. If $string contained "a1b2c3c3b2a1", after the above code it would then contain "aAbBcCcCbBaA".

In your example, the first list is specified as: !-~ which is a short-hand notation meaning all the characters between '!' and '~', That is all the visible characters in the (7-bit) ASCII character set. Eg:

!"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdef +ghijklmnopqrstuvwxyz{|}~

The second list, P-~!-O specifies the same characters, but in a different order, as two ranges. 'P' through '~' and '!' through 'O'. Effectively,

PQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~!"#$%&'()*+,-./01234567 +89:;<=>?@ABCDEFGHIJKLMNO

The effect of these tables is that '!' will be translated to 'P' (and 'P' will become '!'); '"' will become 'Q' (and 'Q' becomes '"') and so on.

This is a reversible (obfuscation) process similar to ROT13. Effectively "ROT47".

However, why this is being applied to the input data, your guess is as good as mine. Probably better :)


Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error.
"Science is about questioning the status quo. Questioning authority".
In the absence of evidence, opinion is indistinguishable from prejudice.


Comment on Re: what is the translation?
Select or Download Code
Re^2: what is the translation?
by Albannach (Prior) on Jul 20, 2011 at 04:35 UTC
Re^2: what is the translation?
by roadtest (Sexton) on Jul 20, 2011 at 13:17 UTC
    Awesome! Thanks for your reply!

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others avoiding work at the Monastery: (11)
As of 2014-04-23 20:56 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    April first is:







    Results (554 votes), past polls