Help for this page

Select Code to Download


  1. or download this
    open FILE,"tnsnames.ora" or die $!;
{local $/=undef; $_ = <FILE>; }
close FILE;
  2. or download this
    open(FILE, '<', 'tnsnames.ora')
  or die "Cannot open tnsnames.ora for reading, stopped ",$!;
my $tnsnames = '';
...
  $tnsnames .= $_;
}
close FILE;