die if $@ && $@ ne "alarm\n";