Thread Command Line Arguments: Komandozeilen-Argumente (3 answers)
Opened by Cu8e at 2006-03-29 13:23

Cu8e
 2006-03-29 13:23
#64162 #64162
User since
2006-03-07
7 Artikel
BenutzerIn
[default_avatar]
Hi,

ich habe ein kleines Problem. Beim Aufruf des Perl-Skripts will ich Argumente mitgeben. Leider werden diese erst gar nicht mit an das Skript gegeben.

So sieht ein Beispiel-Skript aus:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21

my @cmd_option;

@cmd_option = @ARGV;

print "Argument: $cmd_option[0]\n"; #Hier kommt schon nix raus

&CmdLineArg (@cmd_option);

sub CmdLineArg {
  my $opt = $_[0];

  SWITCH: {
    if ($opt eq "") {
      print "No Command Line Argument given!\n";
    }

    if ($opt eq "copy") {
      print "Command Line Argument $opt given!\n";
    }
  }
}


Der Aufruf des Skripts sieht so aus:
test.pl copy

Das ganze soll unter W2K laufen. Kann mir jemand dabei helfen oder hat jemand eine Erklärung, woran das liegen könnte?

Danke für Eure Hilfe.

View full thread Command Line Arguments: Komandozeilen-Argumente