$temp =~ s/\[\%1\%\]/$news1/; $temp =~ s/\[\%2\%\]/$news2/; print header(); print "$temp";