[Cologne-pm] open () was mache ich falsch?

[Cem Sakaryali]

"warn" ist nur reingekommen weil ich sehen
wollte ob es nur eine Datei ist oder alle.
Vorgesehen ist "die" an der Stelle, wenn alles
läuft.

auch mit "use strict" und "warn" gab es
bei mir kein Abbruch, lief bis zu Ende durch.
(perl 5.6.0)
 

Gruss
Cem


On Fri, 2005-04-08 at 19:12 +0200, Michael Lamertz wrote:
> Ich will jetzt nicht Dein ganzes Script refactorn (auch wenn der eine
> oder Andere hier bestimmt freudig mitmachen wuerde >;-> ) aber:
> 
> On Fri, Apr 08, 2005 at 02:09:31PM +0200, cem.sakaryali at easi.de wrote:
> 
> > sub loadfile {  
> >   my $name = shift;
> >   print "$name\n";
> >   open (A,$name) or warn "|$name| $!";
> >   my @all=<A>;
> >   close (A);
> >   foreach (@all) {
> >       print if $_=~ /RELEASE/;
> >   }
> > }
> 
> ...wenn das open fehl schlaegt, gibtst Du 'ne Warnung aus, machst aber
> ansonsten normal weiter, was bedeutet, dass Du mit 'use strict' beim
> Lesen der Datei - die ja nicht geoeffnet wurde - 'nen Abbruch bekommst.
> 
> Dann doch lieber 
> 
>     open (A, $name) or do {
>         warn ...
>         return;
>     }
> 
> 
> Michael
> 
> PS: Sach'mal Bescheid, wenn Du 'ne Ausfahrt machst :-)
> 
>