verwirrende aussagen auf perldoc.perl.org: bezogen auf defined - #67744 (Allgemeines zu Perl)

legine

2006-06-30 22:44

User since
2006-06-30
32 Artikel
BenutzerIn
[default_avatar]

hehe danke.

Komisch.
Ich matche eine Zeile im folgenden Programm (wobei x irgendein inhalt ist.):
xxxxxxx xx xxxxxxx xxxxxxxxxxx xxxxx
---------------------------------------------------
xxxxxxxxxxxxxxxx xxxxxxxx xxxxxxxxxxxxxxxx xxxxxxxx
xxxxxxxxxxxxxxxx xxxxxxxx xxxxxxxxxxxxxxxx xxxxxxxx
xxxxxxxxxxxxxxxx xxxxxxxxxxxxxxxx xxxxxxxx

So mein match sieht so aus

Code: (dl )

$zeile =~ /^\s+([a-zA-Z0-9]{0,16})\s+([a-zA-Z0-9]{0,8})\s+([a-zA-Z0-9]{0,16})\s+([a-zA-Z0-9]{0,8})/;

Klar die ersten 2 Zeilen Matchen nicht. Also exact der beschriebene Fall.

Komisch nur das die Zeile:

Code: (dl )

1
2

unless (defined ($Match[0])) {
...}

die unerwüschten Zeile herausfiltert und das wiederum führt zu mächtig viel verwirrung auf meiner Seite. (Notiz. die suchergebnisse aus $1 werden in $Match[0] kopiert weil ich das array später noch brauche)

Nur so als anmerkung, klar benutze ich die zeile ($1 eq "") als entscheidungskriterium weil ich es besser lesbar finde.