$i = $j = 'unchanged';
name(\$i);
print("i:$i\n");        # i:changed

$i = $j = 'unchanged';
$j = name($i);
print("i:$i, j:$j\n");  # i:unchanged, j:changed

$i = $j = 'unchanged';
$j = name(\$i);
print("i:$i, j:$j\n");  # i:changed, j:changed