$a = 'one'; 
$b = 'two'; 
@d = ( $a, $b, \$b );;