while(my $row = $sth->fetchrow_hashref()) {
   ($cntct_date) = $row->{"CONTACT_DATE"};