expr: protect scalar from listel and hashel

This fixes the first part of test/closures/named.pl
@b = (99, 98, 97);
$b[1] = "XXX";
@b now returns (99, XXX, 97)