Parameter in Unterprogrammen.. - #115494 (Allgemeines zu Perl)

johnh

2008-10-14 12:45

User since
2008-10-05
23 Artikel
BenutzerIn
[default_avatar]

Hallo zusammen,

ich möchte ein Unterprogramm aufrufen und ein Parameter übergeben. Mein Code sieht folgendermaßen aus:

Code (perl): (dl )

open (PlotJ,">$jitter.dat") || die "log.txt file found!";
my @inpud = <PlotJ>;

//
close(PlotJ);

Gnuplot(@inpud); // Mein Unterprogrammaufruf

Code vom Unterprogram

Code (perl): (dl )

sub Gnuplot
{
        my $i;
        for($i=0;$i<@_;$i++){
        print " Inhalt: $_[$i]\n";      
}

Wenn ich aber mein Array mit der for-Schleife durchlaufe, wird der Inhalt nicht ausgegeben, da ich wahrscheinlich keine Werte explizit gespeichert habe mit

Code (perl): (dl )

my @inpud = (2,9,12,43,2,3,1);

zumindest gehe ich davon aus...

Meine Frage ist, wie kann ich den einfach den Inhalt vom Filehandler PlotJ bzw vom Jitter.dat mit dem Parameter übergeben ?

Wäre nett, wenn mir jemand helfen könnte...

grüße,
J