It works nearly in the same exact way as the code you already asked about except that:
- the flow control is syntactically (but not logically!) different;
- it doesn't do a check on the actual strings, but on a checksum computed for them which gives a sufficient condition for two of them to be different. That is, if the checksums are different, then the strings will be different too, while the converse does not hold: different strings may have the same checksums (but we rely on the confidence that such occurrencies are rare enough), hence => my remarks
Then you wrote:
For example, I don't understand this line:
my (@lines, %line_md5);
Oh my! Please tell me you're joking!! I see that you have 204 writing as of now. That's quite surprising... maybe you're not really programming in Perl, but in some vaguely similar language. What is it precisely that you do not understand?
| [reply] [d/l] |
my
unless
It looks like perldoc is down....so try these links:
my
unless (BTW does anyone know where perldoc.perl.org keeps the info about unless and other control structures?)
| [reply] |
program file
thats enough? ....
i recommend you to read some perl guide
perl -Te 'print map { chr((ord)-((10,20,2,7)[$i++])) } split //,"turo"'
| [reply] [d/l] [select] |
So how much are you getting paid for this one? How much do we get? | [reply] |