Opened by rucksl at 2006-07-25 20:52
User since
2006-03-29
1520 Artikel
BenutzerIn
2006-03-29
1520 Artikel
BenutzerIn
Hmm, ich weiß nicht so ganz ob das eine ganz Optimale Lösung ist, jedenfalls stand im Alpaka Buch das man IO::File nutzen sollte, wenn man eine Referenz auf ein Dateihandle erstellen möchte. Dieses Referenz könntest du dann natürlich auch nutzen und die Referenzen einem Array hinzufügen.
Allerdings ist mir aufgefallen das ein "print <$files[0]>" nicht klappt, und er gibt dann die blessed Referenz aus. Du musst also die Referenz wieder wie oben gezeigt in ein einzelnes Skalar Speichern und es dann als Dateihandle benutzen.\n\n
<!--EDIT|sid burn|1153858482-->
Code: (dl
)
1
2
3
4
5
use IO::File;
my @files;
map {push @files, IO::File->new("$_")} qw/foo.txt bar.txt/;
map {print <$_>} @files;
Allerdings ist mir aufgefallen das ein "print <$files[0]>" nicht klappt, und er gibt dann die blessed Referenz aus. Du musst also die Referenz wieder wie oben gezeigt in ein einzelnes Skalar Speichern und es dann als Dateihandle benutzen.\n\n
<!--EDIT|sid burn|1153858482-->
Nicht mehr aktiv. Bei Kontakt: ICQ: 404181669 E-Mail: perl@david-raab.de