Select Code to Download

#!/usr/bin/perl
use strict;
use warnings;
...
    print $tb;    
    print "\n\n";
}

C:\Old_Data\perlp>perl t4.pl
     A B C
...
brown 3 1 4
red   1 1 0
grey  1 5 3