Kleine Frage - #78945 (Allgemeines zu Perl)

2007-07-27 01:24

User since
2007-06-05
26 Artikel
BenutzerIn
[default_avatar]

Hallo, ich wollte ein kleines Programm schreiben, welches wenn man es mit "-s" aufruft und wenn man es mit "-l" aufruft etwas bestimmtes ausführt.

Also zum Beispiel,

Code: (dl )

$perl /home/user/foo -s

, sollte eine bestimmte Datei verschieben und

Code: (dl )

$perl /home/user/foo -l

, sollte eine bestimmte Datei löschen.

Nun ist mein Problem, das ich nicht weiß wie ich so was mache, meine erste Überlegung war:

Code: (dl )

my $aufruf = pop(@ARGV);
if ( $aufruf =~ /-s/i ) {
....
....

Das klappte aber nicht wirklich (Use of uninitialized value in pattern match (m//) at ./foo line 7.)\n\n