Auch Hi!
param("pwd");
Hm, kleiner Dämpfer. Die Doublequotes sind kostenaufwendig, weil der String darin interpoliert wird. Schreibe lieber param('pwd') mit Singlequotes.
Du hast ja echt wenig Vertrauen in die Optimierungsmechanismen von Perl. Natuerlich wird dieser String nicht interpoliert, da steht naemlich nichts zum interpolieren drin.
check();
Noch'n Dämpfer: &check(); oder auch ✓
#!/usr/bin/perl -w
use strict;hätten Dich darauf hingewiesen.
Wie kommst Du darauf? Ich schreibe Funktionsaufrufe immer in der Form Check(); da ist bisher noch nie was gemeldet worden. (Man beachte den grossen Anfangsbuchstaben bei Check, so werden clashes mit builtins vermieden, und man kann trotzdem so schreiben, wie man es von tausend anderen Sprachen her kennt.)
So long