$tmpl=<<'_tmpl_end'; §CMD§ "§PARA§"; _tmpl_end %value=( PARA => 'blabla', CMD => "print" ); $tmpl=~s/§([A-Z]+)§/$value{$1}/g; print $tmpl;