unless ($form{'searchstring'}) {
	$form{'searchstring'}= '[a-zA-Z]';
}
if ($desc =~ /$form{'searchstring'}/i) {
...
}

##</code><code>##

 
if ($form{'searchstring'} eq "any character") {
	$form{'searchstring'}= '[a-zA-Z]';
}