[oak perl] perl can bite me
Belden Lyman
blyman at iii.com
Mon Nov 25 19:20:10 CST 2002
Perl, quite simply, can bite me. Just a moment ago, it did.
(Ouch! Still smarts some.)
I "uncovered a bug in perl", viz:
% perl
# perl in interactive mode
for my $login (qw(blyman root daemon nobody)) {
my $pwent = getpwnam( $login );
print $pwent ? "+ $login\n" : "- $login\n";
}
__END__
+ blyman
- root <-- huh?!
+ daemon
+ nobody
Coffee/beer/drink_of_your_choice is on me to the first
person (except you, George [0] ) who can tell us why
this isn't a bug in Perl.
Here's a clue: this was my first time to use getpwnam().
Belden
[0] - "except you, George" because this is a clever ruse
to get someone else to post something on this list. Yes,
I get subtlety points today.
More information about the Oakland
mailing list