Was willst Du denn nicht in dem Ausdruck haben?
Den Ausdruck bekommst Du ja über ein Formular.
Du könntest also etwas machen wie:
(Perl)
my $userregex = $q->param('regex');
my $ergebnis = 'Bitte geben Sie den Ausdruck ein:';
my $match = 0;
if ($userregex =~ /^\w+$/) {
# dieser Ausdruck ist sehr simple und ueberfluessig, da er nur alphanumerische Zeichen zulaesst
$match = 1;
} else {
$match = 0;
}
if ($match == 1) {
# ... wende den Ausruck an
$ergebnis = 'Hat geklappt';
} else {
$ergebnis = 'Der Ausdruck hat nicht gepasst';
}