my $eval_string = sprintf '$return_val = $%s_of{refaddr $self};', $attr;