@call_history=$dbh->sql("select * from teamweb..CALLS where Userid='$userid'");

foreach $line (@call_history)
        {
        $havethey=@$line[0];
        }