my $contents;
{
  local $/;
  open (FILE, $txt_file) || die "Cannot open $txt_file:$!";
  $contents = <FILE>
}