C:>perl -E "my @x=qw(3 4 5); say @x; $x[2] = E; say @x;"
345
34E