Opened by krusty at 2006-08-11 14:11
User since
2006-01-27
91 Artikel
BenutzerIn
![[default_avatar]](/battie/theme/default/default_avatar.gif)
2006-01-27
91 Artikel
BenutzerIn
@styx-cc,
vielen Dank für dein Script. Funktioniert super.
Kannst du mir vielleicht auch noch den Unterschied zwischen meinem Konstrukt und deinem sagen?
Meins sieht so aus:
Wenn ich dein Script einbaue funktioniert es:
Verstehe ehrlichgesagt nicht ganz warum das nur mit einer for Schleife funktioniert. Wäre super wenn du das kurz erklären könntest.
Danke nochmal für die Hilfe.
vielen Dank für dein Script. Funktioniert super.
Kannst du mir vielleicht auch noch den Unterschied zwischen meinem Konstrukt und deinem sagen?
Meins sieht so aus:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
my $gefunden = 0;
open(DATA, "<$path/$file") || die "Cannot open file!\n";
while (<DATA>)
{
$zeile = $_;
if ( /^Belegnummer;Position;Materialnr.;/ )
{
$gefunden = 1;
}
if ( $gefunden == 1 )
{
$zeile =~ s/=\n//;
print "Debug: $zeile\n";
}
}
close (DATA);
Wenn ich dein Script einbaue funktioniert es:
Code: (dl
)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
open(DATA, "<$path/$file") || die "Cannot open file!\n";
for (<DATA>)
{
$zeile = $_;
if ( /^Belegnummer;Position;Materialnr.;/ )
{
$gefunden = 1;
}
if ( $gefunden == 1 )
{
$zeile =~ s/=\n//;
print $zeile;
}
}
close (DATA);
Verstehe ehrlichgesagt nicht ganz warum das nur mit einer for Schleife funktioniert. Wäre super wenn du das kurz erklären könntest.
Danke nochmal für die Hilfe.