$ perl -e 'use Win32;print Win32::IsAdminUser(),"\n";$>=0; print $!,"\n"; print $>,"\n"'
1
Invalid Argument
4638
$