http://www.perlmonks.org?node_id=520261


in reply to Re: Perl always reads in 4K chunks and writes in 1K chunks... Loads of IO!
in thread Perl always reads in 4K chunks and writes in 1K chunks... Loads of IO!

This:

open DF, "test.txt" || die "Can't read 'test.txt': $!\n"

Does not do what you think it does.

The || ties itself to "test.txt", which is always true, and not to the return of the open.

This:
open(DF, "test.txt") || die "Can't read 'test.txt': $!\n"

or:

open DF, "test.txt" or die "Can't read 'test.txt': $!\n"

(or binds less tight than ||)

Would accomplish what you want.


GreetZ!,
    ChOas

print "profeth still\n" if /bird|devil/;