1 #!/usr/bin/perl 2 use warnings; 3 use strict; 4 use POSIX ":sys_wait_h"; 5 6 $SIG{CHLD} = sub{ 7 my $pid; 8 while($pid = waitpid(-1, ...
確定! 回上一頁