Help for this page

Select Code to Download

Select or download this

      if( defined $fileno ){
          open STDIN,  "<&$fileno" 
...
      }
      STDIN->autoflush(1);
      STDOUT->autoflush(1);