Help for this page

Select Code to Download


  1. or download this
      read STDOUT, $_, 8192;
  2. or download this
      my $rv = read STDOUT, $_, 8192;
  die "read: $!\n" if !defined($rv);
  3. or download this
    before=0
after=0
read: Bad file descriptor
  4. or download this
    open(STDOUT, '+>', "/tmp/stdout.log") or die $!;
  5. or download this
    close(STDOUT);
open(STDOUT, '+>', "/tmp/stdout.log") or die $!;
  6. or download this
    before=0
after=0
stdout=hello world
at end=12