| Aw documentation | Contained in the Aw distribution. |
Aw::Log - ActiveWorks Log Module.
require Aw::Log;
my $typeDef = new Aw::Log;
Enhanced interface for the Aw.xs Log methods.
Daniel Yacob Mekonnen, Yacob@wMUsers.Com
perl(1). Aw(3).
| Aw documentation | Contained in the Aw distribution. |
package Aw::Log; BEGIN { use strict; use vars qw($VERSION); $VERSION = '0.2'; } sub getMessage { my ( $self, $msgId ) = ( shift, shift ); ( ref( $_[0] ) eq "ARRAY" ) ? $self->_getMessage ( $msgId, $_[0] ) : $self->_getMessage ( $msgId, \@_ ) ; } ######################################################### # Do not change this, Do not put anything below this. # File must return "true" value at termination 1; ########################################################## __END__