print $file $name, $rank, $serial_num, "\n";