Help for this page

Select Code to Download


  1. or download this
    open(FILE,"<$file") || die $!;
my $data = do { local $/; <FILE> };
close(FILE);
  2. or download this
    open(FILE,"<$file") || die $!;
my $data;
{ local $/; $data = <FILE> }
close(FILE);