in reply to How might I return tied scalar that does not have to be dereferenced as $$scalar?
Datum->tieVar( (my $d), -type=>'date' ); ... package Datum; sub tieVar { my $class= shift @_; my $toTie= \$_[0]; shift @_; tie $$toTie, $class, @_; } [download]