Help for this page

Select Code to Download


  1. or download this
    {
   open(my $fh, '>', 'deleteme.tmp')
...
   # Not binmode.
   print <$fh>;
}
  2. or download this
    
{
...
   binmode(STDIN);
   print scalar(<STDIN>), scalar(<STDIN>), scalar(<STDIN>);
}