Select Code to Download

package SSEParser;
use Moo;
use Data::Dumper;
...
    return $doc;
}
1;

package SSEDocument;
use Moo;
extends 'XML::LibXML::Document';
...
    return $self->findnodes("//DNOM/Substation/Bus");
}
1;

#!/usr/bin/perl
use warnings;
use strict;
...
print Dumper($sse_doc);

my @buses = $sse_doc->find_buses();

$VAR1 = bless( {
                 '_State_' => 0,
                 'XML_LIBXML_PARSER_OPTIONS' => 4102
...
======================================================================
+=====
$VAR1 = bless( do{\(my $o = 68387856)}, 'SSEDocument' );
Can't locate object method "find_buses" via package "SSEDocument" at C
+:\usr\scripts\SSE\sseparser\pm\testmyclass.pl line 12.