From 202e193921617dc4ebbb812b88b3173706243c6b Mon Sep 17 00:00:00 2001 From: Paul Buetow Date: Fri, 13 May 2011 14:21:40 +0000 Subject: added an example module --- lib/PerlDaemonModules/ExampleModule.pm | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) create mode 100644 lib/PerlDaemonModules/ExampleModule.pm (limited to 'lib/PerlDaemonModules/ExampleModule.pm') diff --git a/lib/PerlDaemonModules/ExampleModule.pm b/lib/PerlDaemonModules/ExampleModule.pm new file mode 100644 index 0000000..75708f2 --- /dev/null +++ b/lib/PerlDaemonModules/ExampleModule.pm @@ -0,0 +1,17 @@ +package PerlDaemonModules::ExampleModule; + +sub new ($$$) { + my ($class, $conf) = @_; + + return bless { conf => $conf }, $class; +} + +sub do ($) { + my $self = shift; + my $conf = $self->{conf}; + my $logger = $conf->{logger}; + + $logger->logmsg('ExampleModule Test'); +} + +1; -- cgit v1.2.3