X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FShell.pm;h=72c7ec213760fa56de070f961fdcf863b4f63025;hb=c1d8f74eb4326dca73e3ac3f73812dff8489ecf7;hp=e9af9c432470d6fe1adc7cde843f909a3ab38baf;hpb=2b63cd5cea47e4bc97380284adf9fb0e89f7c10c;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/Shell.pm b/lib/Shell.pm index e9af9c4..72c7ec2 100644 --- a/lib/Shell.pm +++ b/lib/Shell.pm @@ -6,7 +6,8 @@ use File::Spec::Functions; our($capture_stderr, $raw, $VERSION, $AUTOLOAD); -$VERSION = '0.7'; +$VERSION = '0.72_01'; +$VERSION = eval $VERSION; sub new { bless \my $foo, shift } sub DESTROY { } @@ -34,8 +35,6 @@ use constant OS => $^O; =begin private -=over - =item B<_make_cmd> $sub = _make_cmd($cmd); @@ -43,8 +42,6 @@ use constant OS => $^O; Creates a closure which invokes the system command C<$cmd>. -=back - =end private =cut @@ -209,11 +206,15 @@ quotes (C<">) on Windows. =head2 Configuration -If you set $Shell::capture_stderr to true, the module will attempt to +If you set $Shell::capture_stderr to 1, the module will attempt to capture the standard error output of the process as well. This is done by adding C<2E&1> to the command line, so don't try this on a system not supporting this redirection. +Setting $Shell::capture_stderr to -1 will send standard error to the +bit bucket (i.e., the equivalent of adding C<2E/dev/null> to the +command line). The same caveat regarding redirection applies. + If you set $Shell::raw to true no quoting whatsoever is done. =head1 BUGS