X-Git-Url: http://git.indexdata.com/?a=blobdiff_plain;f=test%2Fbin%2Fbomb.pl;h=ae978595c97b61f785cfa3544502277673843876;hb=4d0391438640a5fa35047a6ed7af43a5e7b72bcc;hp=94f5c8d08135263cd299499c0ccf191f92050a25;hpb=a9772d3eb3dda0386b98a03d83656058a6adcec4;p=mkws-moved-to-github.git diff --git a/test/bin/bomb.pl b/test/bin/bomb.pl index 94f5c8d..ae97859 100755 --- a/test/bin/bomb.pl +++ b/test/bin/bomb.pl @@ -57,7 +57,7 @@ $SIG{ALRM} = sub { my $pgid = getpgrp(); warn "Alarm handler got called after $timeout seconds\n"; - warn "Kill now the process group...\n\n"; + warn "Kill now the process group $pgid\n\n"; # kill process group kill "INT", -$pgid; @@ -69,7 +69,7 @@ $SIG{INT} = "IGNORE"; alarm($timeout); system(@system) == 0 - or die "system('@system') failed: ?='$?', !='$!', ^E='$^E', ?='$?'"; + or die "system('@system') failed: ?='$?', !='$!', ^E='$^E'\n"; 1;