open FILE,"tnsnames.ora" or die $!;
{local $/=undef; $_ = <FILE>; }
close FILE;