view release on metacpan or search on metacpan
ex/MyModule.commented view on Meta::CPAN
# MODINFO dependency module IO::Handle
use IO::Handle;
# MODINFO parent_class NiceModule
@ISA = qw/ Exporter Autoloader NiceModule /;
# MODINFO function new
sub new {
#This is my object oriented constructor!
my($class) = @_;
return bless {} => $class;
}
# MODINFO function method1
sub method1 {
my($self) = @_;
return 1;
}
# MODINFO function method2
sub method2($$) {
ex/MyModule.pm view on Meta::CPAN
use XML::DOM;
use CGI;
use IO::Handle;
@ISA = qw/ Exporter Autoloader NiceModule /;
sub new {
#This is my object oriented constructor!
my($class) = @_;
return bless {} => $class;
}
sub method1 {
my($self) = @_;
return 1;
}
sub method2($$) {
my($self, $message) = @_;
print "$message!\n";
lib/Devel/ModInfo.pm view on Meta::CPAN
functions => \@functions,
properties => \@properties,
module => $mod_obj,
};
#print Dumper $self;
#
# Return object
#
return bless $self => $class;
}
# MODINFO function properties
# MODINFO retval ARRAYREF
sub properties{$_[0]->{properties}}
# MODINFO function methods
# MODINFO retval ARRAYREF
sub methods{$_[0]->{methods}}
lib/Devel/ModInfo/Constructor.pm view on Meta::CPAN
our @EXPORT = qw();
# MODINFO version 2.04
our $VERSION = '2.04';
# Preloaded methods go here.
# MODINFO constructor new
sub new{
my ($class, %attribs) = @_;
my $self = $class->SUPER::new(%attribs);
return bless $self => $class;
}
1;
__END__
=head1 Devel::ModInfo::Constructor
Devel::ModInfo::Constructor - Defines a function in an object-oriented Perl module that
lib/Devel/ModInfo/Dependency.pm view on Meta::CPAN
# MODINFO constructor new
# MODINFO paramkey attribs Attributes for the new object
# MODINFO key type Type of dependency (currently either PERL (version) or MODULE)
# MODINFO key target Indicates the dependency, such as DBI or IO::Handle
sub new{
my ($class, %attribs) = @_;
my $self = {
type => $attribs{type},
target => $attribs{target},
};
return bless $self => $class;
}
# MODINFO function type
# MODINFO retval STRING
sub type{$_[0]->{type}}
# MODINFO function target
# MODINFO retval STRING
sub target{$_[0]->{target}}
lib/Devel/ModInfo/Feature.pm view on Meta::CPAN
my ($class, %attribs) = @_;
my $display_name = $attribs{display_name} || $attribs{name};
my $self = {
short_description => $attribs{short_description},
name => $attribs{name},
display_name => $display_name,
attributes => $attribs{attributes},
};
return bless $self => $class;
}
# MODINFO function short_description Provides a short description of the feature
# MODINFO retval STRING
sub short_description{$_[0]->{short_description}}
# MODINFO function name The internal name of the feature
# MODINFO retval STRING
sub name{$_[0]->{name}}
lib/Devel/ModInfo/Function.pm view on Meta::CPAN
# MODINFO key parameters ARRAYREF Array ref of parameter objects for this function
# MODINFO key data_type STRING Data type this function returns
sub new{
my ($class, %attribs) = @_;
my $self = $class->SUPER::new(%attribs);
#Set up local properties
$self->{parameters} = $attribs{parameters};
$self->{data_type} = $attribs{data_type};
return bless $self => $class;
}
# MODINFO function parameters The array of parameters that can be provided for this function
# MODINFO retval STRING
sub parameters {$_[0]->{parameters}}
# MODINFO function data_type The data type returned by this function
# MODINFO retval STRING
sub data_type {$_[0]->{data_type}}
lib/Devel/ModInfo/Method.pm view on Meta::CPAN
# Preloaded methods go here.
# MODINFO constructor new
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
return bless $self => $class;
}
1;
__END__
=head1 Devel::ModInfo::Method
lib/Devel/ModInfo/Module.pm view on Meta::CPAN
# MODINFO key version STRING Version of the class
# MODINFO key dependencies ARRAYREF Array of dependencies this module has
# MODINFO key parent_classes ARRAYREF Array of classes this module inherits from
sub new{
my ($class, %attribs) = @_;
my $self = $class->SUPER::new(%attribs);
$self->{class} = $attribs{class};
$self->{version} = $attribs{version};
$self->{dependencies} = $attribs{dependencies};
$self->{parent_classes} = $attribs{parent_classes};
return bless $self => $class;
}
# MODINFO function class
# MODINFO retval STRING
sub class{$_[0]->{class}}
# MODINFO function version
# MODINFO retval STRING
sub version{$_[0]->{version}}
lib/Devel/ModInfo/ParamArray.pm view on Meta::CPAN
# Preloaded methods go here.
# MODINFO constructor new
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
#Set up local properties
return bless $self => $class;
}
1;
__END__
=head1 Devel::ModInfo::ParamArray
Devel::ModInfo::ParamArray - Defines a particular Perl module and contains collections of
lib/Devel/ModInfo/ParamHash.pm view on Meta::CPAN
# MODINFO key keys ARRAYREF Array of keys for this paramhash
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
$self->{keys} = $attribs{keys};
$self->{data_type} = String2DataType('HASH');
#Set up local properties
return bless $self => $class;
}
# MODINFO function keys
# MODINFO retval ARRAYREF
sub keys{$_[0]->{keys}}
1;
__END__
lib/Devel/ModInfo/ParamHash/Key.pm view on Meta::CPAN
# MODINFO version 2.04
our $VERSION = '2.04';
# Preloaded methods go here.
# MODINFO function new
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
return bless $self => $class;
}
1;
__END__
=head1 Devel::ModInfo::ParamHash::Key
Devel::ModInfo::ParamHash::Key - Defines a single key/value pair that is expected
to be provided to a method, function, or constructor
lib/Devel/ModInfo/ParamHashRef.pm view on Meta::CPAN
# MODINFO key keys ARRAYREF Array of keys for this paramhash
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
$self->{keys} = $attribs{keys};
$self->{data_type} = String2DataType('HASHREF');
#Set up local properties
return bless $self => $class;
}
# MODINFO function keys
# MODINFO retval ARRAYREF
sub keys{$_[0]->{keys}}
1;
__END__
lib/Devel/ModInfo/Parameter.pm view on Meta::CPAN
# MODINFO key data_type STRING The data type of the parameter
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
#Set up local properties
$self->{data_type} = $attribs{data_type};
return bless $self => $class;
}
# MODINFO function data_type
# MODINFO retval STRING
sub data_type{$_[0]->{data_type}}
1;
__END__
lib/Devel/ModInfo/ParameterScalar.pm view on Meta::CPAN
# MODINFO paramhash attribs Attributes for the new object
# MODINFO key data_type STRING The data type of the parameter
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
#Set up local properties
$self->{data_type} = $attribs{data_type};
return bless $self => $class;
}
# MODINFO function data_type
# MODINFO retval STRING
sub data_type{$_[0]->{data_type}}
1;
__END__
lib/Devel/ModInfo/ParentClass.pm view on Meta::CPAN
our $VERSION = '2.04';
# Preloaded methods go here.
# MODINFO constructor new
sub new{
my ($class, %attribs) = @_;
my $self = {
name => $attribs{name},
};
return bless $self => $class;
}
# MODINFO function name
# MODINFO retval STRING
sub name{$_[0]->{name}}
1;
__END__
lib/Devel/ModInfo/Property.pm view on Meta::CPAN
# MODINFO write_method STRING The name of the method that will accept a value to update this property
# MODINFO key data_type STRING The data type of the parameter
sub new{
my ($class, %attribs) = @_;
#Call superclass
my $self = $class->SUPER::new(%attribs);
$self->{read_method} = $attribs{read_method};
$self->{write_method} = $attribs{write_method};
$self->{data_type} = $attribs{data_type};
return bless $self => $class;
}
# MODINFO function read_method
# MODINFO retval STRING
sub read_method{$_[0]->{read_method}}
# MODINFO function write_method
# MODINFO retval STRING
sub write_method{$_[0]->{write_method}}
view all matches for this distributionview release on metacpan - search on metacpan