=cut
-use base qw/Exporter/;
+use base qw<Exporter>;
our @EXPORT = ();
our %EXPORT_TAGS = (
- funcs => [ qw/abs_path/ ],
- codes => [ qw/SAVE NEXT REDO LAST/ ],
- levels => [ qw/INFO WARN ERR CRIT/ ],
+ funcs => [ qw<abs_path> ],
+ codes => [ qw<SAVE NEXT REDO LAST> ],
+ levels => [ qw<INFO WARN ERR CRIT> ],
);
our @EXPORT_OK = map { @$_ } values %EXPORT_TAGS;
$EXPORT_TAGS{'all'} = [ @EXPORT_OK ];