Select Code to Download

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

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