Opened by Rambo at 2004-02-12 18:22
User since
2003-08-14
803 Artikel
BenutzerIn
2003-08-14
803 Artikel
BenutzerIn
Hallo,
komme leider nicht weiter, ich möchte die Parameter
die in If schleifen vorkommen an eine Sub weiter geben
und von dort erneut an eine weiter Sub.
Beispiel:
merci
remo
komme leider nicht weiter, ich möchte die Parameter
die in If schleifen vorkommen an eine Sub weiter geben
und von dort erneut an eine weiter Sub.
Beispiel:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
#use strict;
use warnings;
my $t1 = "1";
if ($t1 eq 1){
$A1 = "Hallo1";
next1();
}
if ($t1 eq 2){
$A1 = "Hallo2";
next2();
}
sub next1{
print "das ist $A1\n";
$Z1 = "nix da";
new1();
}
sub next2{
print "das ist $A1\n";
$Z1 = "nix da";
new2();
}
#
sub new1{
print "das ist $A1 und $Z2 \n";
}
sub new2{
print "das ist $A1 und $Z2 \n";
}
merci
remo