Perl 5: http://search.cpan.org/~errno/