Skip Menu |

This queue is for tickets about the AnyEvent-Subprocess CPAN distribution.

Report information
The Basics
Id: 109573
Status: new
Priority: 0/
Queue: AnyEvent-Subprocess

Owner: Nobody in particular
Requestors: jsw [...]

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Subject: warning about enum syntax; one-line patch included
Date: Tue, 24 Nov 2015 08:01:52 -0500
To: bug-AnyEvent-Subprocess [...]
From: Jeff Wheeler <jsw [...]>
Download (untitled) / with headers
text/plain 2.3k
use AnyEvent::Subprocess produces a warning about improper enum syntax (follows.) A one-line patch appears to resolve this (directly below.) # diff 42c42 < enum WhenToCallBack, qw/Readable Line/; --- Show quoted text
> enum WhenToCallBack, [qw/Readable Line/];
root@husker:/usr/local/share/perl/5.18.2/AnyEvent/Subprocess# diff -up --- 2015-11-24 07:54:37.107078755 -0500 +++ 2015-11-24 07:54:57.359078392 -0500 @@ -39,7 +39,7 @@ coerce SubprocessCode, from ArrayRef[Str subtype CodeList, as ArrayRef[CodeRef]; coerce CodeList, from CodeRef, via { [$_] }; -enum WhenToCallBack, qw/Readable Line/; +enum WhenToCallBack, [qw/Readable Line/]; 1; $ perl -cw bin/nftDecider2.p5 Passing a list of values to enum is deprecated. Enum values should be wrapped in an arrayref. at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 42. require AnyEvent/Subprocess/ called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/Job/Delegate/ line 12 AnyEvent::Subprocess::Job::Delegate::Handle::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 require AnyEvent/Subprocess/Job/Delegate/ called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 16 AnyEvent::Subprocess::DefaultDelegates::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 require AnyEvent/Subprocess/ called at /usr/local/share/perl/5.18.2/AnyEvent/ line 11 AnyEvent::Subprocess::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 require AnyEvent/ called at bin/nftDecider2.p5 line 5 main::BEGIN() called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 eval {...} called at /usr/local/share/perl/5.18.2/AnyEvent/Subprocess/ line 0 bin/nftDecider2.p5 syntax OK $ perl -v This is perl 5, version 18, subversion 2 (v5.18.2) built for x86_64-linux-gnu-thread-multi (with 41 registered patches, see perl -V for more detail) -- Jeff S Wheeler <> Sr Network Operator / Innovative Network Concepts

This service is sponsored and maintained by Best Practical Solutions and runs on infrastructure.

Please report any issues with to