open IN, "+<$file" || die "Can not open $file";
	while (<IN>)
	{
		$readINtemp = $_;
		$messagein .= $readINtemp;
	}
	close IN;