File ddd.pm:use warnings; use strict; use ddd; print "APPLE = $apple \n"; exit 0;
Any thoughts?use strict; use warnings; package ddd; require Exporter; our @ISA = qw(Exporter); our @EXPORT = qw( $apple $pear ); use Readonly; Readonly our $apple => "funny"; Readonly our $pear => "bad"; 1;
In reply to Export Constants Common to Lots of Packages by jffry
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |