12\t45

##</code><code>##

map {chomp;[$_,split(/\t/)]}

##</code><code>##

["12\t45", 12, 45]

##</code><code>##

$a->[0] <=> $b->[0] ||
$a->[1] <=> $b->[1]

##</code><code>##

$a->[1] <=> $b->[1] or
$a->[2] <=> $b->[2]