от Perl Info Org :: online perl documentation and information

Синтаксис

   * fileno FILEHANDLE

Обяснение

Връща указателя към отворен файл, или undef ако файла не е отворен. Обикновенно се използва заедно със select и POSIX операции от ниско ниво за управление на терминала.

Примери

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