Вот скрипт:
#!/usr/bin/perl
my $timer1 = 11;
my $timer2 = 2;
my $parent = $$;
my $child = fork();
print "parent: ".$parent;
print "\nchild: ".$child;
if ( $$ == $parent ) {
sleep($timer1);
my $killchild = kill("TERM", $child);
print "\nParent kill child\n";
}else{
sleep($timer2);
my $killparent = kill("TERM", $parent);
print "\nChild kill power\n";
}
Вот вывод при параметрах timer1 > timer2:
[root@server user]# ./test.pl
parent: 3580
parent: 3580
child: 3581
Parent kill child
Вот вывод при параметрах timer1 < timer2:
[root@server user]# ./test.pl
parent: 3587
parent: 3587
child: 0
Child kill power
Завершено
Как убрать системное уведомление "Завершено" из вывода, когда timer1 < timer2?