System Functions Perl

  1. Home
  2. Perl
  3. System Functions
  4. List users
#!/usr/bin/perl
use warnings;
use strict;
my @users;
while (my $name = getpwent) {
    push @users, $name;
}
print "Users: @users \n";