print $rowobj->${ \$cols{id} };