Dateiverbindungen aus dem Modul IO::File

 [Vorheriges Kapitel]  [Vorherige Seite]  [Inhaltsverzeichnis]  [Nächste Seite]  [Nächstes Kapitel]

addresses3.pl
#!/usr/local/bin/perl -w

use strict;
use IO::File;

my $addressbook = "addressbook";
my $book = new IO::File $addressbook;
die "Cannot open $addressbook: $!\n" unless defined $book;
while (defined($_ = $book->getline)) {
   chomp;
   my($name, $address) = split /:/;
   printf "%-20s | %s\n", $name, $address;
}
$book->close;

*Das Modul IO::File offeriert eine elegante Lösung, die alle genannten Probleme löst.
 
*Der Konstruktor von IO::File liefert ein Objekt zurück, das einerseits eine Reihe von Methoden unterstützt aber auch in gewohnter Weise (z.B. innerhalb von <...>) verwendet werden kann.
 
*Dateiverbindungen, die IO::File kreiert hat, werden automatisch geschlossen, wenn sie der Garbage-Collection anheimfallen.
 
*Aus implementierungstechnischen Gründen ist es nicht möglich, eine Erweiterung des Moduls IO::File zu definieren.
 

 [Vorheriges Kapitel]  [Vorherige Seite]  [Inhaltsverzeichnis]  [Nächste Seite]  [Nächstes Kapitel]
Copyright © 1996, 1998, 1999, 2000 Andreas Borchert, in HTML konvertiert am 07.02.2000