Help for this page

Select Code to Download


  1. or download this
    tie our %conf, 'My::Hash';
# $dir is a tied Tie::Scalar
...
$dir = $conf{'dir'};
print $dir, $/;
# now prints /somewhere/else
  2. or download this
    package My::Hash;
use base 'Tie::Hash';
...
  }
}
1;
  3. or download this
    tie our %conf, 'My::Hash';
our $dir = $conf{'dir'};
...
#
# why is $dir untied now yet I can still call tied methods
# on it?