>perl -le "use strict; print $ENV{WINDIR};"
E:\WINNT