open(FILE,"<file.txt");
my $template = '';
while(my $line = <FILE>) {
	$template .= $line;
}
close FILE;