SOAP-Lite
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
examples/My/PingPong.pm view on Meta::CPAN
package My::PingPong;
sub new {
my $self = shift;
my $class = ref($self) || $self;
bless {_num=>shift} => $class;
}
sub next {
my $self = shift;
$self->{_num}++;
}
sub value {
my $self = shift;
$self->{_num};
}
1;
view all matches for this distributionview release on metacpan - search on metacpan
( run in 0.498 second using v1.00-cache-2.02-grep-82fe00e-cpan-2c419f77a38b )