my $whatever = param("WHATEVER"); # title, handle, whatever
if ($whatever =~ /[^a-zA-Z0-9_ /) {
  handle_failure("Sorry, but that contains unsupported characters.");
}