[perl-win32-gui-users] Kill event?

[Peter E. <Pet...@at...>]

Is there a Kill or other such event if a GUI app crashes or killed? Or
should that just be handled with %SIG it would be awfully convenient if you
could do something like:


sub Exit
{
	return -1;
}

sub Window_Terminate
{
	print "App closed gracefully.\n";
	&Exit();
}

sub Window_Kill
{
	print "Ack! My process just died!\n";
	&Exit();
}