Select Code to Download

open IN,'<1';
while (<IN>) {
...
        print "$_: $r{$_}\n";
}

1.2.2.3.3.4.4.5.6.7.8.9.10.10.11.11.12.12.: 8