$_ = <>; die "Syntax Error\n" unless m/^[10]$/; die "Syntax Error\n" if defined <>; exit $_;