Using chr(vec $actions, $_, 8) as a substitute for substr($actions, $_, 1) might confuse the issue here. The first use of vec() is the important one. I think you hit it exactly, though. He needed chr().

-sauoq
"My two cents aren't worth a dime.";