Help for this page

Select Code to Download

Select or download this

#!/usr/bin/perl
while(@data = <DATA>){
...
ON PAC-30 BASKETBALL
..AU:
DK

Select or download this

C,ON PAC,BY PK
R CHRIS,ON PAC-20 FOOTBALL,ON PAC-30 BASKETBALL
DK