Help for this page

Select Code to Download


  1. or download this
    open(FH, '<&=0');
    
  2. or download this
    perl -T -MFcntl=SEEK_SET -e'getpwent(); open(FH,q{<&=3}) or die $!; se
    +ek(FH,0,SEEK_SET); print <FH>'