develooper Front page | perl.beginners | Postings from March 2002

RE: Testing for filehandles

Thread Previous | Thread Next
Bob Showalter
March 27, 2002 14:40
RE: Testing for filehandles
Message ID:
> -----Original Message-----
> From: []
> Sent: Wednesday, March 27, 2002 3:18 PM
> To: Beginners Perl Mailing List
> Subject: Testing for filehandles
> Hello, All:
> I've looked around for an answer to this (The Camel Book, The 
> Ram Book, 
> perldoc,, etc.) but can't find a thing: Is it 
> possible to test 
> for the existence of a filehandle?
> I've got a small script that <optionally> opens a filehandle. If that 
> filehandle exists, I'd like to print to it. Otherwise, don't. e.g.,
> ...

You can pass a filehandle glob to IO::Handle::opened():

   use strict;
   use IO::Handle;

   open(F, "<foo") or die;
   print "F is open\n" if IO::Handle::opened(*F);

Thread Previous | Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About