>perl -le "use strict; use Env; our $WINDIR; print $WINDIR;" E:\WINNT