elsif ($query->param('action') eq 'delete') {
delete();
}
benutzen. Auch gut. Mit der Klammer wird lediglich verlangt, daß null oder mehr Argumente für "delete" gelten sollen.
Unfug.
Jetzt hast du aber mit
sub delete {
[ ... ]
}
angewiesen, daß dein "delete" gar keine Argumente hat - hier fehlt ganz einfach die Klammer, die du eben selbst gefordert hattest.
Unfug.
Folgerichtig hat PERL ein Problem:
Not enough arguments for delete
Höre doch bitte endlich auf, derartigen Unsinn zu verbreiten. Das ist ja grausam.
H.
P.S.: perldoc -f delete