Help for this page

Select Code to Download


  1. or download this
      sub add
      {
    ...
        tie *$fh, "IO::Multiplex::Handle", $self, $fh;
        return $fh;
      }
    
  2. or download this
      $rv = ($self->{_fhs}{"$fh"}{oldtie})
        ? $self->{_fhs}{"$fh"}{oldtie}->READ($data, BUFSIZ)
        : &POSIX::read(fileno($fh), $data, BUFSIZ);
    
  3. or download this
      $rv = ($self->{_fhs}{"$fh"}{oldtie})
        ? $self->{_fhs}{"$fh"}{oldtie}->READ($data, BUFSIZ)
        : &POSIX::read(fileno($fh), $data, BUFSIZ);