Help for this page

Select Code to Download

Select or download this

while ( my $user = getpwent() ) { $users{$user} = 1; }
while ( my $group = getgrent() ) { $groups{$group} = 1; }
open (my $fh, '>>', '/var/log/httpd/fudge.log');
...
      grep( { $!{$_} } keys %! ),
      q/ /;
}

Select or download this

Error 
  25 Inappropriate ioctl for device
  25 Inappropriate ioctl for device
...
  25 Inappropriate ioctl for device
  25 Inappropriate ioctl for device
  ENOTTY