in reply to Require Centralized Variables
YuckFoo
==== MyConfig.pm ==== package MyConfig; my $CONFIG = { color => 'blue', animal => 'camel' }; *{"::CONFIG"} = \$CONFIG; 1; ==== testit.pl ==== #!/usr/bin/perl use strict; use MyConfig; print "$CONFIG->{color} $CONFIG->{animal}\n";
|
|---|