my $ContactID = somecontactid;
my @rows=$db->select("select HTMLCheck from Contact where ContactID=$ContactID");
my $HTMLCheck = $rows[1]->{HTMLCheck};
# do something with $HTMLCheck

##</code><code>##

my $HTMLCheck = $db->select("select HTMLCheck from Contact where ContactID=$ContactID")[1]->{HTMLCheck};