Select Code to Download

                02:17   02:40   02:46   02:59
 Apples             0       0       0       0
...
 TUBELIGHS        282     271     265     257

 TOTAL            289     278     272     264

#!/usr/bin/perl -w

...
    map { printf $format, $_ } @$pvalues;
    print "\n";
}