in reply to foreach (each character in string..)?

Split it on nothing:

foreach (split //, $string) { . . . }

----
I wanted to explore how Perl's closures can be manipulated, and ended up creating an object system by accident.
-- Schemer

: () { :|:& };:

Note: All code is untested, unless otherwise stated