my $columnname = 'id'; print $rowobj->{$columnname};