autodie=system system(qw[ grep -P . 2]) broken "grep: invalid option -- ," [rt.cpan.org #49740]

[toddr]

Migrated from rt.cpan.org#49740 (status was 'new')

Requestors:

Attachments:

• trace.autodie-2.06_01.txt

From on 2009-09-16 13:46:01
:

"grep -P . 2" works from command line, and system, and
IPC::System::Simple, but not with autodie=system

echo >2
cat 2
grep -P . 2
perl -Mautodie=system -e " system qw[ grep -P . 2]"
perl -MIPC::System::Simple=system -e " system qw[ grep -P . 2]"
perl -Mautodie=system -MDevel::ModList -e 1
perl -Mautodie=:all -d:Trace -e " system qw[ grep -P . 2]"
>trace.autodie-2.06_01.txt 2>&1




D:\>echo >2

D:\>cat 2
ECHO is on.

D:\>grep -P . 2
ECHO is on.

D:\>perl -Mautodie=system -e " system qw[ grep -P . 2]"
Subroutine IPC::System::Simple::WIFEXITED redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 109.
Subroutine IPC::System::Simple::WEXITSTATUS redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 110.
Subroutine IPC::System::Simple::WIFSIGNALED redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 111.
Subroutine IPC::System::Simple::WTERMSIG redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 112.
grep: invalid option -- ,
Usage: grep [OPTION]... PATTERN [FILE]...
Try `grep --help' for more information.
"grep" unexpectedly returned exit value 2 at (eval 10) line 13
 at -e line 1

D:\>perl -MIPC::System::Simple=system -e " system qw[ grep -P . 2]"
Subroutine IPC::System::Simple::WIFEXITED redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 109.
Subroutine IPC::System::Simple::WEXITSTATUS redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 110.
Subroutine IPC::System::Simple::WIFSIGNALED redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 111.
Subroutine IPC::System::Simple::WTERMSIG redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 112.
ECHO is on.

D:\>perl -Mautodie=system -MDevel::ModList -e 1
Subroutine IPC::System::Simple::WIFEXITED redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 109.
Subroutine IPC::System::Simple::WEXITSTATUS redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 110.
Subroutine IPC::System::Simple::WIFSIGNALED redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 111.
Subroutine IPC::System::Simple::WTERMSIG redefined at
C:/perl/site/5.10.1/lib/IPC/System/Simple.pm line 112.
AutoLoader             5.69
Carp                   1.11
Carp::Heavy
Config
Config_git.pl
Config_heavy.pl
Devel::ModList
DynaLoader             1.10
Exporter               5.63
Fatal                2.06_01
Fcntl                  1.06
File::Spec              3.3
File::Spec::Unix        3.3
File::Spec::Win32       3.3
IPC::System::Simple    1.18
List::Util             1.21
POSIX                  1.17
Scalar::Util           1.21
Tie::Hash              1.03
Tie::RefHash           1.38
Win32                  0.39
Win32::Process         0.14
XSLoader               0.10
autodie              2.06_01
autodie::exception   2.06_01
autodie::exception::system 2.06_01
base                   2.14
constant               1.19
if                     0.05
overload               1.07
re                     0.09
vars                   1.01
warnings               1.06
warnings::register     1.01

D:\>perl -Mautodie=:all -d:Trace -e " system qw[ grep -P . 2]"
>trace.autodie-2.06_01.txt 2>&1

D:\>
D:\>