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


in reply to checking if file is empty or not

hmm, this works but is probably inefficient.
open FILE, "Filename" || die; @file = <FILE>; close FILE; $file = join( "", @file); if ( $file ne "" ) { #there's something there! }

Just thought I'd pose another solution

--=Lolindrath=--

Replies are listed 'Best First'.
Re: (Buzzcutbuddha: Don't Reinvent The Wheel!): Re: checking if file is empty or not
by buzzcutbuddha (Chaplain) on Aug 07, 2000 at 18:57 UTC
    There are file operators out there that will test the size and/or if it's an empty file already created, and there is no need to create a new way to do it.
    It's good to know that you are thinking, and I am happy that you are willing to participate, but there is a reason why laziness is a virtue. :)

    Cheers!