$Data::Dumper::Deepcopy = 1; [download]
In reply to Re: help with references by poj in thread help with references by dw_perlmonks