1 package System::Introspector::Puppet;
6 default => sub { '/var/lib/puppet/state/classes.txt' },
9 has resources_file => (
11 default => sub { '/var/lib/puppet/state/resources.txt' },
17 classes => $self->_gather_classes,
18 resources => $self->_gather_resources,
22 sub _gather_resources {
24 my $file = $self->resources_file;
25 open my $fh, '<', $file
26 or return { error => "Unable to read $file: $!" };
38 my $file = $self->classes_file;
39 open my $fh, '<', $file
40 or return { error => "Unable to read $file: $!" };