http://qs321.pair.com?node_id=533660


in reply to Re: is filehandler used ?
in thread is filehandler used ?

if (defined fileno(OUT)) {
    print OUT "bla bla\n";
}

[download]

    --k.


Replies are listed 'Best First'.
Re^3: is filehandler used ?
by beachbum (Beadle) on Mar 01, 2006 at 14:59 UTC
    any idea of the diff between yours and mine? I've always used *HANDLE: 
    use strict;
use warnings;
open(OUT, ">test.txt") or die "Can't open file to write, $!.";
if(defined fileno *OUT){
    print "File handle is valid.";
}else{
    print "Nope.";
}
close OUT;

    [download]
[reply]
[d/l]
      No diff. \*HANDLE also works.
[reply]
[d/l]

In Section Seekers of Perl Wisdom