Help for this page

Select Code to Download


  1. or download this
    $lastlog_t = "L a32 a256"; #(your machine maybe differ);
$LEN = length(pack($lastlog_t,0, '', ''));
print "length = $LEN \n";
  2. or download this
    setpwent();
while(@list = getpwent()) {
...
  print "home directory for $login is $home \n";
}
endpwent();
  3. or download this
    #!/usr/bin/perl

...
@>>>>> @<<<<<< @<<<<<<<<<<<<<<<<<<<<<<<<<<<<<< @||||||||||||
$uid   $login  $fullname               $date