cpan/Win32/t/GetFolderPath.t

   1 use strict;\r
   2 use Test;\r
   3 use Win32;\r
   4 \r
   5 plan tests => 1;\r
   6 \r
   7 # "windir" exists back to Win9X; "SystemRoot" only exists on WinNT and later.\r
   8 ok(Win32::GetFolderPath(Win32::CSIDL_WINDOWS), $ENV{WINDIR});\r