http://qs321.pair.com?node_id=1051918


in reply to Console output != file output

Whenever you have a problem like this, don't just "print".
use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper $type;
Now you will see all unprintable characters and you can continue programming instead of blindly guessing =)