Select Code to Download

#!/usr/local/bin/perl -w

...
1 time 02:11:05 djw
5 time 04:20:03 bert
2 time 00:01:39 chris

[jcw@linux fs]$ perl q.pl
key=bert, val=5
key=chris, val=2
key=djw, val=1
[jcw@linux fs]$