#! perl -slw
use strict;

open PIPE, '-|', q[ c:\\perl32\\bin\\perl.exe -v ] or die $^E;

print "<<<$_>>>" while <PIPE>;