Next | The Perl Hardware Store | DC.pm Version | 57 |
Since the stringized representation is faithful, you can use a hash to unstringize:
sub remember { my ($reference) = @_; $true_value{$reference} = $reference; }
The value is the real reference; the key is the stringized version
To unstringize:
sub unstringize { my ($stringized) = @_; return $true_value{$stringized}; }
Next | Copyright © 2003 M. J. Dominus |