code_perl/Maasha/Test.pm

   1 package Maasha::Test;
   2
   3
   4 use warnings;
   5 use strict;
   6
   7 require Exporter;
   8
   9 use vars qw( @ISA @EXPORT @EXPORT_OK );
  10
  11 @ISA = qw( Exporter );
  12
  13 @EXPORT_OK = qw(
  14     hello_world
  15 );
  16
  17 sub hello_world
  18 {
  19     print "Hello Word\n";
  20 }
  21
  22 END {
  23     &hello_world;
  24 }