$a = '' ; $str = "blabla${a}blabla" ; $a = "XXX" ; print "$str\n" ;