Win32::Useful - Collection of useful functions that extend Win32 functionality

Win32-Useful documentation Contained in the Win32-Useful distribution.

Index

Code Index:

NAME

Top

Win32::Useful - Collection of useful functions that extend Win32 functionality

FUNCTIONS

Top

IsLastError( $errorcode )

Checks whether or not Win32::GetLastError() is equal to the the given errorcode. Returns a True value if they are equal, 0 otherwise.

Compares the values as unsigned values, so you do not have to cope with Win32::GetLastError() returning a signed integer.

AUTHOR

Top

Sascha Kiefer, esskar@cpan.org

COPYRIGHT AND LICENSE

Top

Copyright (C) 2006 Sascha Kiefer

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

Win32-Useful documentation Contained in the Win32-Useful distribution. 
package Win32::Useful;

use strict;
use warnings;

use vars qw/$VERSION/;
$VERSION = '0.02';

use Win32 ();


sub IsLastError {
	return sprintf("%u", shift) == sprintf("%u", Win32::GetLastError());
}


1;