Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked
 
PerlMonks  

zek152's scratchpad

by zek152 (Pilgrim)
on Jun 14, 2010 at 15:30 UTC ( #844636=scratchpad: print w/replies, xml ) Need Help??

Excerpt from HOP sub tokens { my $target = shift; return sub { TOKEN: { return ['INTEGER', $1] if $target = /\G (\d+) /gcx; return ['PRINT'] if $target = /\G print \b /gcx; return ['IDENTIFIER', $1] if $target = /\G ([A-Za-z_]\w*) /gcx; return ['OPERATOR', $1] if $target = /\G (\*\*) /gcx; return ['OPERATOR', $1] if $target = /\G ([-+*\/=()])/gcx; return ['TERMINATOR', $1] if $target = /\G (; \n* | \n+) /gcx; redo TOKEN if $target = /\G \s+ /gcx; return ['UNKNOWN', $1] if $target = /\G (.) /gcx; return; } }; } ----------------------------------------------------- cipher text 1 ciphertxt2 ciphertxt3 | | | +-------------+ +----------+ +---- | | | | | key--decryption | decrypt | decrypt | | | | | -------X +--X +----------X | | | plaintext 1 plntxt2 plntxt3

If you modify cipher text 1 it is obvious that plaintext 1 will change. Plaintext 2 will also change because of the XOR with ciphertext 1 (following the decryption). Ciphertext 2 is not different though (nor is ciphertext3) so plaintext 3 will not be different.

Log In?
Username:
Password:

What's my password?
Create A New User
Chatterbox?
[karlgoethebier]: no saturday night special?
[karlgoethebier]: AKA bla, bla
LanX night fever ... ha ha ha ha staying alive ...
[karlgoethebier]: No sack of rice fell over in China?
[karlgoethebier]: PM is going down...

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (8)
As of 2017-10-21 14:58 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    My fridge is mostly full of:

















    Results (270 votes). Check out past polls.

    Notices?