Frage zu defined (Allgemeines zu Perl)

[thread]14691[/thread]

Frage zu defined

Leser: 29

Articles: hide open all | hide show old branches

+4 replies
pktm

2010-02-18 11:51
User since
2003-08-07
2921 Artikel
BenutzerIn
Hallo!

In der Manpage von DirHandle steht folgendes bei SYNOPSIS:
Code: (dl )

1 2 3 4 5 6 7 8

use DirHandle; $d = DirHandle->new("."); if (defined $d) { while (defined($_ = $d->read)) { something($_); } $d->rewind; while (defined($_ = $d->read)) { something_else($_); } undef $d; }
Mich interessiert dabei im speziellen die Zeile:
Code: (dl )

while (defined($_ = $d->read)) { something($_); }
Da steht ein defined um die Zuweisung von $_ herum. Soweit ich das verstehe, muss das da stehen, weil $_ immer deklariert ist, aber undef sein kann. Bitte korrigiert mich, falls das falsch ist.

Wenn ich jetzt aus der obigen Zeile das hier mache:
Code: (dl )

1 2 3

while( my $dir_entry = $d->read() ) { something($dir_entry); }
Dann brauche ich doch das defined nicht mehr, weil die Bedingung im Schleifenkopf nicht mehr erfüllt ist - oder?

Grüße, pktm
http://www.intergastro-service.de (mein erstes CMS :) )
- Taulmarill
  
  2010-02-18 12:00
  
  User since
  2004-02-19
  1750 Artikel
  BenutzerIn
  
  Das defined brauchst du hier, weil $d->read Werte zurück liefern kann, die als boolesch falsch interpretiert werden, aber trotzdem gültige Verzeichnis- oder Dateinamen sind.
  $_=unpack"B*",~pack"H*",$_ and y&1|0& |#&&print"$_\n"for@.=qw BFA2F7C39139F45F78 0A28104594444504400 0A2F107D54447DE7800 0A2110453444450500 73CF1045138445F4800 0 F3EF2044E3D17DE 8A08A0451412411 F3CF207DF41C79E 820A20451412414 83E93C4513D17D2B
- +2 replies
- sid burn
  
  2010-02-18 12:01
  
  User since
  2006-03-29
  1520 Artikel
  BenutzerIn
  
  2010-02-18T10:51:40 pktm
  Da steht ein defined um die Zuweisung von $_ herum. Soweit ich das verstehe, muss das da stehen, weil $_ immer deklariert ist, aber undef sein kann. Bitte korrigiert mich, falls das falsch ist.
  
  Nein,
  mit $d->read wird eine datei aus dem verzeichniss ausgelesen und es $_ zugewiesen.
  
  Wenn alle Dateien vom Directory Handle ausgelesen wurde gibt $d->read() und "undef" als wert zurück.
  
  Lässt du das defined() weg, dann prüft du lediglich ob der Dateiname ein wahrer wert ist oder nicht. Wenn der Dateiname z.B. eine "0" sein würde, dann würde deine schleife schon vorzeitig abbrechen, obwohl noch nicht alle Einträge gelesen wurden.
  
  Daher ein defined drum herum.
  Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de
  - pktm
    
    2010-02-18 12:03
    
    User since
    2003-08-07
    2921 Artikel
    BenutzerIn
    
    Alles klar, danke.
    http://www.intergastro-service.de (mein erstes CMS :) )

View all threads created 2010-02-18 11:51.