@l_tmp = (1,2,3,4);
$l_ref = \@l_tmp;
print $$l_ref[0];    # This works , by printing 1

$l_ref = \(1,2,3,4);
print $$l_ref[0];    # This fails ( prints nothing )