[p5sagit/p5-mst-13.2.git] / cpan / Win32 / t / ExpandEnvironmentStrings.t

use strict;\r
use Test;\r
use Win32;\r
\r
plan tests => 1;\r
\r
ok(Win32::ExpandEnvironmentStrings("%WINDIR%"), $ENV{WINDIR});\r
Commit	Line	Data
8883bb5a	1	use strict;\r
	2	use Test;\r
	3	use Win32;\r
	4	\r
	5	plan tests => 1;\r
	6	\r
	7	ok(Win32::ExpandEnvironmentStrings("%WINDIR%"), $ENV{WINDIR});\r