Jaka jest różnica między <stdin> i <STDIN>?

Question

Kiedy używam plików <stdin> w pliku Perla (*.pm), nie odczytuję danych wejściowych z klawiatury, ale kiedy używam <STDIN> w tym samym miejscu, to działa dobrze.

Dlaczego nie dostaję wejście kiedy używam <stdin>?

Answer 1

STDIN jest udokumentowane uchwyt pliku. Istnieje również stdin, który jest aliasowany na STDIN, ale działa tylko w pakiecie main::: main::stdin jest taki sam jak main::STDIN (jak udokumentowano w perlop - Perl operators and precedence).

W pakiecie zatem

package My::Package; 
sub xx { 
    print while <stdin>; 
} 

stdin jest interpretowany jako My::Package::stdin, która nie istnieje. Można użyć main::stdin z pakietu, ale przy użyciu standardowego STDIN (która zawsze wskazuje main::STDIN, nawet z pakietu) jest znacznie czystszy.

Answer 2

nie wiedział o tym, ale uznał to udokumentowane w jednorazowe pkt w perlop

The uchwytów plików STDIN, STDOUT i STDERR są predefiniowane. (Operatory plików: stdin, stdout i stderr będą działać również z wyjątkiem pakietów, gdzie będą interpretowane jako identyfikatory lokalne, a nie globalne.) Dodatkowe uchwyty plików mogą być tworzone między innymi za pomocą funkcji open(). Aby uzyskać szczegółowe informacje, patrz perlopentut i "open" w perlfunc.