package Guard;

$SIG{__DIE__} = \&diewatcher;
$SIG{'QUIT'} = \&diewatcher;
sub diewatcher 

{
	$SIG{__DIE__} = 'DEFAULT';
	
	print "Na na u can't that \n";
	
}

1;