erste Lehrzeile finden ???

[Torsten]

moin moin,

hat jemand mal schnell ne einfache loesung?

foreach my $in (@buffer) {
   if ($in eq ????) {...}
}

in @buffer ist der inhalt einer datei und ich brauche die erste
gefundene lehrzeile.

DANKE

[Kube]

moin moin,

hat jemand mal schnell ne einfache loesung?

foreach my $in (@buffer) {
   if ($in eq ????) {...}
}

in @buffer ist der inhalt einer datei und ich brauche die erste
gefundene lehrzeile.

DANKE

Hallo,

so etwa:
if ($in=~/^\s*$/) {print 'jippie, ne Leerzeile!';}

Gruss,
Kube

[Torsten]

moin moin,

hat jemand mal schnell ne einfache loesung?

foreach my $in (@buffer) {
   if ($in eq ????) {...}
}

in @buffer ist der inhalt einer datei und ich brauche die erste
gefundene lehrzeile.

DANKE

Hallo,

so etwa:
if ($in=~/^\s*$/) {print 'jippie, ne Leerzeile!';}

Gruss,
Kube

jo danke