Hi James,
It looks like the object is based on a scalar. To see what I mean, play
with the code below. In the case of the output in your email, I suspect the
class name would have been on the line after "bless"
cheers,
Andrew
#!/usr/bin/env perl
use strict;
use warnings;
use feature 'say';
package Foo {
sub new {
my $class = shift;
my $val = 12345;
my $self = \$val;
bless($self, $class);
return $self;
}
sub hello {
my $self = shift;
return "I am ".$$self;
}
};
my $foo = Foo->new;
say $foo->hello;
use Data::Dumper;
say Dumper($foo);
On Fri, Jan 25, 2019 at 3:12 PM James Kerwin <jkerwin2...@gmail.com> wrote:
> Hi All,
>
> I needed to slightly alter the behaviour of a module I use in Perl.
>
> In order to see the data structure I used Data:Dumper to get an output so
> I could find the piece that I required for the change of logic.
>
> To my shock and horror it gave me this:
>
> $VAR1 = bless( do{\(my $o = '139790129395632')}
>
> I was expecting a series of hashes/arrays of hashes/arrays which I've
> previously been able to navigate through. This is totally foreign to me.
>
> Could anybody shed some light on it please and possibly suggesthow I can
> get to the "stuff"?
>
> My suspicion is that it contains some sort of XML that I'm going to have
> to "crawl" along to get to what I want.
>
> Thanks,
> James
>
>
>
--
Andrew Solomon
Perl Trainer, Geekuni http://geekuni.com/
and...@geekuni.com // +44 7931 946 062
