[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