Hey, someone said TIMTOWTDI. hehehe
#!/usr/bin/perl # http://perlmonks.org/?node_id=1129003 use warnings; use strict; $_ = <<END; uno = uno due = dos tre = tres quattro = quatro cinque = cinco sei = seis sette = siete otto = ocho nouve = nueve dieci =diez uno = un due = due tre = tris quattro = quatre cinque = cinq sei = six sette = sept dieci = dix END print "$1 => $2, $3\n" while /^(\w+) = *(\w+)\b(?=.*\n\n.*^\1 = (\w+)) +/gms;
In reply to Re^2: Need advice on checking two hashes values and keys
by Anonymous Monk
in thread Need advice on checking two hashes values and keys
by perlynewby
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |