open( my $worker, '|-', $ASYNC_NOTIFIER ) or die ...;