Select Code to Download

            12,1427766557, bob

            5,1427766556, bill
        
            10,1427766555, bob

            my %data;
            open(DATA, '<<', 'test.csv') or die "Can't open file: $!";
...
             $#$_!=2 ? next : push @{$data{$_-&gt;[2]}}, @$_[1,0]
            }