$a = 'abc';
$d = 'def';
$A = $a.$b; #ie, $A='abcdef'
print $A.$a.$b;