my $sth = $dbh->prepare("... LIKE ?");
$sth->execute("$cat[0]%");