ID FIRST_NUMBER SECOND_NUMBER 1 1 1 2 1 2 3 2 3 4 2 4 5 3 5 6 3 6 7 4 7 8 4 6 9 5 8 10 5 9 11 6 10 12 6 9 #### if($_=~/^(\d+)\t(.*)/) { $id=$1; $rest=$2; @split_rest = split(/\t/, $rest); $first_num=$split_rest[0]; $second_num=$split_rest[1]; $HoH{$id}{$first_num} = $second_num;