if ($newt =~ /running from alien queen/i) {
	RIPLEY: {
		use HEAVYLOADER;
		kill $alienqueen || undef $newt;
		open (AIRLOCK, ">>hacknedstoryidea.dat") || last RIPLEY;
	}
}