Beefy Boxes and Bandwidth Generously Provided by pair Networks
Syntactic Confectionery Delight


by gods (Initiate)
on Aug 24, 1999 at 22:42 UTC ( [id://219] : perlfunc . print w/replies, xml ) Need Help??


See the current Perl documentation for fileno.

Here is our local, out-dated (pre-5.6) version:

fileno - return file descriptor from filehandle


Returns the file descriptor for a filehandle. This is useful for constructing bitmaps for select() and low-level POSIX tty-handling operations. If FILEHANDLE is an expression, the value is taken as an indirect filehandle, generally its name.

You can use this to find out whether two handles refer to the same underlying descriptor:

    if (fileno(THIS) == fileno(THAT)) {
        print "THIS and THAT are dups\n";