some-usable-scripts/getpwent2.pl

9 lines
66 B
Perl
Raw Normal View History

2011-02-03 13:47:29 +01:00
#!/usr/bin/perl -w
my $user;
my $util;
my @human;
my @inhuman;