# XYZ.pm package XYZ; use strict; use warnings; # require Exporter; # # our @ISA=qw/Exporter/; # our @EXPORT_OK = qw/$PI CONST/; our $PI = 355/113; use constant CONST => 42; 1; #### c:\@Work\Perl\monks\bliako>perl -le "use strict; use warnings; ;; use lib '.'; use XYZ; ;; print 'PI = ', $XYZ::PI; print 'CONST = ', XYZ::CONST; " PI = 3.14159292035398 CONST = 42