open ($FILE, $txt_file) || die "Cannot open $txt_file:$!";
$contents=join('',<FILE>);