set path=%windir%\system32;%windir%;%windir%\system32\Wbem;C:\Perl\bin\