> I used a slightly modified script:
>
> if (@ARGV[0]) {
> while(<>) { print "foo".$_; }
> } else {
> print "Running on $^O, using: $^X, version $]\n";
> open STDOUT,"| \"$^X\" $0 -";
> print "bar\n";
> close STDOUT;
> }
>
> Results (the first sentence is comments of me regarding the used platform,
> the other 2 lines are output of the perl script):
>
> ...
Thanks. http://cvs.openssl.org/chngview?cn=22651 through 22654.
______________________________________________________________________
OpenSSL Project http://www.openssl.org
Development Mailing List [email protected]
Automated List Manager [email protected]