if (@line_split != 3) {
   die("Not enough fields in line $.\n");
}