package EBL::ebl_error_counter; use strict; use warnings; use vars qw($VERSION @ISA @EXPORT @EXPORT_OK) ; $VERSION = '1.0' ; require Exporter; @ISA = qw (Exporter AutoLoader) ; @EXPORT = qw (ok, warning, error, fatal, final_report, ok_count, warning_count, error_count, fatal_count); ...