Related tidbit - be careful of using a regular expression provided by a user, it could blow up on you.

Consider using an eval as a safety:

eval { $desc =~ /$form{'searchstring'}/i }
die "Invalid search pattern: $@" if $@;
[download]

Peace,
-McD