suse man page for tap::object

TAP::Object(3pm)					 Perl Programmers Reference Guide					  TAP::Object(3pm)

NAME
       TAP::Object - Base class that provides common functionality to all "TAP::*" modules

VERSION
       Version 3.17

SYNOPSIS
	   package TAP::Whatever;

	   use strict;
	   use vars qw(@ISA);

	   use TAP::Object;

	   @ISA = qw(TAP::Object);

	   # new() implementation by TAP::Object
	   sub _initialize {
	       my ( $self, @args) = @_;
	       # initialize your object
	       return $self;
	   }

	   # ... later ...
	   my $obj = TAP::Whatever->new(@args);

DESCRIPTION
       "TAP::Object" provides a default constructor and exception model for all "TAP::*" classes.  Exceptions are raised using Carp.

METHODS
   Class Methods
       "new"

       Create a new object.  Any arguments passed to "new" will be passed on to the "_initialize" method.  Returns a new object.

   Instance Methods
       "_initialize"

       Initializes a new object.  This method is a stub by default, you should override it as appropriate.

       Note: "new" expects you to return $self or raise an exception.  See "_croak", and Carp.

       "_croak"

       Raise an exception using "croak" from Carp, eg:

	   $self->_croak( 'why me?', 'aaarrgh!' );

       May also be called as a class method.

	   $class->_croak( 'this works too' );

       "_construct"

       Create a new instance of the specified class.

       "mk_methods"

       Create simple getter/setters.

	__PACKAGE__->mk_methods(@method_names);

perl v5.12.1							    2010-04-26							  TAP::Object(3pm)