Opened by gamerzzz at 2007-03-12 09:56
User since
2007-03-12
10 Artikel
BenutzerIn
![[Homepage]](/battie/theme/default/homepage.gif)
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2007-03-12
10 Artikel
BenutzerIn
Hallo zusammen,
wahrscheinlich saueinfach aber ich raffs nich - ich will halt die vordefinierte Variable $1 an eine sub übergeben - im Suchmuster der Sub wird $1 dann aber nicht ausgewertet:
=> als print erg soll testx rauskommen, aber wie ich $1 auch maskiere, ich kriegs nicht hin. Wenn ich aber in der sub ein
$sub_out = "$1" hart setze funzt es.
Woran liegt es/kann ich das lösen/was hab ich übersehen ?
Danke vorab,
gruß gamerzzz\n\n
<!--EDIT|renee|1173686581-->
wahrscheinlich saueinfach aber ich raffs nich - ich will halt die vordefinierte Variable $1 an eine sub übergeben - im Suchmuster der Sub wird $1 dann aber nicht ausgewertet:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
use strict;
my $string = "testx_testy";
my $in = "(testx_)(testy)";
my $out = '$1';
test("$string","$in","$out");
sub test
{
my $sub_string = shift;
my $sub_in = shift;
my $sub_out = shift;
print "$sub_string <=> $sub_in <=> $sub_out \n";
$sub_string =~ s/$sub_in/$sub_out/g;
print "erg: $sub_string \n";
}
=> als print erg soll testx rauskommen, aber wie ich $1 auch maskiere, ich kriegs nicht hin. Wenn ich aber in der sub ein
$sub_out = "$1" hart setze funzt es.
Woran liegt es/kann ich das lösen/was hab ich übersehen ?
Danke vorab,
gruß gamerzzz\n\n
<!--EDIT|renee|1173686581-->