| Data-AMF documentation | Contained in the Data-AMF distribution. |
Data::AMF::Type::Boolean
Takuho Yoshizu <seagirl@cpan.org>
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
The full text of the license can be found in the LICENSE file included with this module.
| Data-AMF documentation | Contained in the Data-AMF distribution. |
package Data::AMF::Type::Boolean; use strict; use warnings; sub new { my $class = shift; my $self = bless { data => $_[0] }, $class; return $self; } sub data { my $self = shift; if(@_) { $self->{'data'} = $_[0]; } return $self->{'data'}; } 1; __END__