Help for this page

Select Code to Download

Select or download this

use Win32::Pipe;
use strict;
...
  print "\nCould not create pipe\n";
  print "Error: " . Win32::FormatMessage( $Win32::Pipe::Error ) . "\n"
+;
}

Select or download this

sub AUTOLOAD {
    # This AUTOLOAD is used to 'autoload' constants from the constant(
+)
...
    eval "sub $AUTOLOAD { $val }";
    goto &$AUTOLOAD;
}