Opened by Gast at 2005-04-26 19:31
Hi Leute!
Ich hab folgendes Problem:
ich möchte von meiner "main" eine Sub-Funktion aufrufen.
Je nachdem welche unterschiedlichen und beliebig vielen Parameter übergeben werden verhält sich die Funktion anders. Auch die Reihenfolge soll dabei egal sein. Also müssen die Parameter identifiziert werden.
Bsp:
($wert)
($wert, 'eu' )
($wert, 'Punkt' )
($wert, 'bla', 'Punkt', $n_wert)
ein Kollege schrieb mir diesen kurzen Code. Allerdings verstehe ich ihn nicht ganz und bekomme ihn auch nicht lauffähig, damit ich selber damit experimentieren könnte. Leider sehe ich den Kollegen in nächster Zeit nicht mehr.
Vielen Dank im voraus!
Bye, Nemesis_SJ
edit pq: code-tags hinzugefügt\n\n
<!--EDIT|pq|1114530317-->
Ich hab folgendes Problem:
ich möchte von meiner "main" eine Sub-Funktion aufrufen.
Je nachdem welche unterschiedlichen und beliebig vielen Parameter übergeben werden verhält sich die Funktion anders. Auch die Reihenfolge soll dabei egal sein. Also müssen die Parameter identifiziert werden.
Bsp:
($wert)
($wert, 'eu' )
($wert, 'Punkt' )
($wert, 'bla', 'Punkt', $n_wert)
ein Kollege schrieb mir diesen kurzen Code. Allerdings verstehe ich ihn nicht ganz und bekomme ihn auch nicht lauffähig, damit ich selber damit experimentieren könnte. Leider sehe ich den Kollegen in nächster Zeit nicht mehr.
Vielen Dank im voraus!
Bye, Nemesis_SJ
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
sub test {
my $self = shift;
my %args = @_;
if (not defined $args{opt_parameter}) {
$args{opt_parameter} = 17;
}
if ($args{name} eq 'eu' ) {
....
}
}
sub aufrufer {
$obj->test(name => 'eu', zeit => 17.8);
}edit pq: code-tags hinzugefügt\n\n
<!--EDIT|pq|1114530317-->