) = @_;
if (!$self->config_file) {
my $file = $0;
($self->config_file = $0) =~ s/(\.psgi)?$/.json/;
}
$self->data = $self->_read_file($self->config_file);
return $self;
}
sub find {
my ($sel
@_;
return $self->graft('data', $content);
}
1;
__END__
=head1 NAME
Terse::Plugin::Config - JSON configs
=head1 VERSION
Version 0.04
=cut
=head1 SYNOPSIS
package MyApp::Plugin::Config;
u