Exporter::Lite
Exporter::Lite
(von Schwern) behebt zumindest eines dieser Probleme- Die Sub-Klasse
file: examples/Groon2.pm1: package Groon2; 2: use strict; 3: use warnings; 4: use Exporter::Lite; 5: use vars qw(@EXPORT @EXPORT_OK); 6: 7: @EXPORT_OK = qw(kadoonk blorf); 8: @EXPORT = qw(skaplunch); 9: 10: sub kadoonk { print "KADOONK!!\n" } 11: sub blorf { print "blorf..\n" } 12: sub skaplunch { print "SKAPlunch\n" } 13: 14: 1;
Exporter::Lite
erreicht das durch ein sog. mixin.