eval {
	local $SIG{ALRM} = sub { die "alarm\n" }; # NB: \n required
	alarm 2;
	`dir /s c:`;
	alarm 0;
};