print "\$obj->{'manual_pnone'} " . $obj->{'manual_phone'} . "\n"; # wrong

# as opposed to
print "\$obj->manual_pnone " . $obj->manual_phone . "\n"; # correct