Help for this page

Select Code to Download


  1. or download this
    open(my $fh, '<:perlio:raw', $qfn);
    
  2. or download this
    open(my $fh, '<', $qfn);
    binmode($fh);
    
  3. or download this
    local $/;
    my $str = <$FI>;
    
  4. or download this
    read $FI, my $str, -s $FI;