This wouldn't show if you had spaces in your "face" strings, for example.

For a situation like this, I'd probably just use "perl -d", set a break point at the loop and use "x $message" and "x $face" a couple of times.

But you can also use something like Data::Dumper to get some more precise information about your data.