http://www.perlmonks.org?node_id=55777


in reply to use strict;

some code can be helpfull to try to debug this :)