Select Code to Download

T2 23 43 
T2 45 78 
Tn 66 124 
...
T3 20 mir
Tn 100 net2
Tk 1234 low3

 
#!/usr/bin/perl

...

close(RAN);
close(COD);