print Dumper $self;
[download]

What's the Dumper output?

UPDATE: I'm asking, because it seems to work for me:

$VAR1 = bless( {
                 'port' => \'9999',
                 'buffer' => {
                               '172.0.0.1:40000' => {
                                                      'read' => 'value
+'
                                                    }
                             }
               }, 'main' );
[download]

regards,
Luke Jefferson