Sign in
android
/
toolchain
/
perl
/
1121daca35c6c692602621eab28d4de19f0b347d
/
.
/
perl-5.16.2
/
cpan
/
Win32
/
t
/
ExpandEnvironmentStrings.t
blob: 853be4aa0ed29c319b0723ceb2e0fc1acb661021 [
file
] [
log
] [
blame
]
use
strict
;
use
Test
;
use
Win32
;
plan tests
=>
1
;
ok
(
Win32
::
ExpandEnvironmentStrings
(
"%WINDIR%"
),
$ENV
{
WINDIR
});