> 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]

Reply via email to