Help for this page

Select Code to Download


  1. or download this
      open (fd, '/etc/passwd') or die $!;
  my @CONTENTS = <fd>;
  close (fd);
  2. or download this
      sub ypMatchit
  {#This does the most work
...
  {
    push @FINAL, $CurrentEntry if( defined(ypMatchit($CurrentEntry)));
  }
  3. or download this
      open (FD, '/etc/newPasswd') or die $!;
  foreach (@FINAL) { print FD $_; }
  close (FD);