my $sth = $dbh->prepare("select * from CAL where CAL_DS like ?");
$sth->execute($param . '%');