123456789101112131415 package Yote::Census;use base 'Yote::AppRoot';sub show_count { my $self = shift; $self->set_count( 1 + $self->get_count() ); return { r => $self->get_count() };}1;__END__
package
Yote::Census;
use
base
'Yote::AppRoot'
;
sub
show_count {
my
$self
=
shift
->set_count( 1 +
->get_count() );
return
{
r
=>
->get_count() };
}
1;
__END__