local $SIG{ALRM} = sub { kill HUP => $pid; die "No data\n" };