From 11ec0cbf7d2de6b16787e710d54c4fb1e491018f Mon Sep 17 00:00:00 2001 From: Thierry Vignaud Date: Fri, 15 Feb 2008 14:16:55 +0000 Subject: print at which time we got killed --- iurt2 | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) (limited to 'iurt2') diff --git a/iurt2 b/iurt2 index c32107c..15bf97a 100755 --- a/iurt2 +++ b/iurt2 @@ -51,6 +51,7 @@ use File::Basename qw(fileparse); use Mkcd::Commandline qw(parseCommandLine usage); use MDK::Common; use Filesys::Df qw(df); +use POSIX; sub bug_handler { @@ -70,9 +71,9 @@ sub bug_handler { $SIG{SEGV} = sub { bug_handler(@_, 1) }; $SIG{__DIE__} = \&bug_handler; $SIG{TERM} = sub { - warn "Got KILLED by SIGTERM"; + warn "Got KILLED by SIGTERM at " . strftime("%c", localtime()) . " .\n"; exit(1); - }; +}; my $program_name = 'iurt2'; my $VERSION = '0.6.2'; -- cgit v1.2.1