use Data::Dumper; print Dumper $self;