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