$OpenBSD: patch-lib_POE_Component_Supervisor_Handle_Proc_pm,v 1.1 2014/03/24 10:27:09 jasper Exp $
--- lib/POE/Component/Supervisor/Handle/Proc.pm.orig	Mon Nov  8 08:25:58 2010
+++ lib/POE/Component/Supervisor/Handle/Proc.pm	Mon Mar 24 11:23:48 2014
@@ -37,7 +37,7 @@ has start_nested_poe => (
     default => 1,
 );
 
-has [map { "std${_}_callback" } qw(out err in)] => (
+has [map { "std${_}_callback" } (qw(out err in))] => (
     isa => "CodeRef",
     is  => "rw",
     required => 0,
@@ -165,7 +165,7 @@ sub _wrapped_program {
     return $program;
 }
 
-foreach my $event qw(stdout stderr stdin) {
+foreach my $event (qw(stdout stderr stdin)) {
     my $cb_name = "${event}_callback";
     event $event => sub {
         if ( my $cb = $_[OBJECT]->$cb_name ) {
@@ -247,7 +247,7 @@ event _close_stdin => sub {
     }
 };
 
-foreach my $sig qw(term kill) {
+foreach my $sig (qw(term kill)) {
     my $SIG = uc($sig);
 
     my $event = "_${sig}_loop";
