Une des devises de Perl est TIMTOWTDI (prononcé " tim flagorneur »). C'est un acronyme qui signifie «il ya plus d'une façon de le faire. " Comme tout le reste en Perl, il ya beaucoup de façons de capturer l'entrée standard. Parmi eux se trouve un raccourci pour la lecture de toutes les lignes dans un fichier et faire quelque chose avec eux individuellement . Comme il s'agit d' une action commune dans les programmes Unix -like filtre , il est très souvent utilisé dans les programmes Perl. Instructions
1
utiliser l'opérateur " angle" . Perl dispose de quatre handles de fichiers ouverts par défaut : . STDIN , STDOUT , STDERR et de données, dont STDIN est la poignée d'alimentation standard , utilisé pour capturer l'entrée standard
2
Utiliser l'opérateur angle de lire une seule ligne du descripteur de fichier qui lui est passé , pour les stocker dans la variable $ _ par défaut ou l'utiliser comme le côté droit d'une expression d'affectation . L'opérateur " angle" est un descripteur de fichier entouré par inférieures et supérieures de symboles, également appelés « chevrons ». "$ a = ";
3
L'opérateur angle dans une boucle while . L'opérateur équerre devrait être la seule chose dans le tandis que l'expression booléenne de boucle lorsque l'aide d'équerres dans une boucle while . Chaque fois que la boucle while est exécuté, il lira une ligne et l'attribuer à l'opérateur $ _ . Quand il n'y a plus de lignes à lire, la boucle while va finir : "while ( ) {chomp ; # Chomp l'impression variable $ _ ; # Imprimer la variable $ _ }"
4
Attribuer le exploitant angle par rapport à une liste . Affectation des résultats de l'opérateur angle à une liste , c'est comme dire " stocker toutes les lignes de ce descripteur de fichier à cette liste. " Lorsque vous attribuez l'opérateur angle à une liste, un autre raccourci est effectuée, et affecte toutes les lignes d' entrée à la liste: " @ my_list = ; "
5
Lire à partir du descripteur de fichier STDIN en utilisant la fonction de lecture . L'équerre ne lit que des lignes complètes , et ce qui risque de ne pas être ce que vous voulez faire , la fonction de lecture vous permettra de lire n'importe quelle quantité d'octets dans une variable . Elle prend trois paramètres : le descripteur de fichier , la variable à stocker dans le nombre d'octets à lire . L'exemple suivant lit 10 octets dans $ buffer : " lire ( STDIN , $ buffer , 10); "