Que signifie cette ligne du fileno perldoc?

Question

Le perldoc for fileno dit

Handles connectés à des objets de mémoire par l'intermédiaire de nouvelles fonctionnalités d'ouverture peuvent revenir même si elles sont undefined ouvertes.

S'agit-il de nouveaux appels de style à ouvrir en général, ou des IO::Scalar appels de style à ouvrir?

Answer 1

Ce code semble indiquer qu'il ne s'applique qu'à la version IO :: Scalar de open. C'est probablement parce qu'il n'y a pas de fileno de niveau d'OS sous-jacent associé au handle de fichier.

#!/usr/bin/perl 

use 5.010; 
use strict; 
use warnings; 

my $fakefile = "foo\nbar\nbaz\n"; 
open my $fake, "<", \$fakefile 
    or die "could not open fakefile [$fakefile]: $!"; 

open my $script, "<", $0 
    or die "could not open self for reading: $!"; 

print "fake: ", my_fileno($fakefile), "\nreal: ", my_fileno($script), "\n"; 

sub my_fileno { 
    my $fileno = fileno shift; 
    $fileno //= "undef"; 
    return $fileno; 
}