$x = "abc"; $xghi = "def"; print "${x}ghi\n"; # abcghi print "$xghi\n"; # def