Re: Change 31935: Upgrade to Win32-0.32

> Change 31935 by stevehmaldoror on 2007/09/21
07:39:02
>         Upgrade to Win32-0.32

Jerry D. Hedden wrote:
> > ./perl -Ilib ext/Win32/t/Names.t
> 1..16
> ok 1 - Win32:omainNam
e()
> not ok 2 -   - checking returned domain
> #   Failed test '  - checking returned domain'
> #   at ext/Win32/t/Names.t line 21.
> #                   undef
> #     doesn't match '/^[a-zA-Z0-9!#$%^&()_'{}.~-]+$/'

Skips test under Cygwin because $^E doesn't work under
Cygwin.

2007/9/24, Jerry D. Hedden <jdheddencpan.org>:
> > Change 31935 by stevehmaldoror on 2007/09/21
07:39:02
> >         Upgrade to Win32-0.32
>
> Jerry D. Hedden wrote:
> > > ./perl -Ilib ext/Win32/t/Names.t
> > 1..16
> > ok 1 - Win32:omainNam
e()
> > not ok 2 -   - checking returned domain
> > #   Failed test '  - checking returned domain'
> > #   at ext/Win32/t/Names.t line 21.
> > #                   undef
> > #     doesn't match '/^[a-zA-Z0-9!#$%^&()_'{}.~-]+$/'
>
> Skips test under Cygwin because $^E doesn't work under
Cygwin.

Aargh,
$^E works under cygwin: $^E is the last posix style error,
Win32::GetLastError() the last win32 style error, the best
of both worlds.

You wont need $^E, you will need Win32::GetLastError().
-- 
Reini Urban
http://phpwiki.org/       
      http://murbreak.at/
http://spacemovie.mur.at/   http://helsinki.at/