seek(FIN, $start_pc, 0) or die "seek:$!";