Prev: Read all the lines with get

Process a file line by line

#!/usr/bin/env perl6
use v6;

my $filename = $*PROGRAM_NAME;

my $fh = open $filename;
for $fh.lines -> $line {
    say $line;

The lines() method of the file handle can return either all the lines, some of the lines. As it does it lazily in the above code we get an iterator behavior so the file is read line-by-line into the $line variable by the for loop. This script is very similar to what the unix cat command does.

Prev: Read all the lines with get

Table of Contents


In the comments, please wrap your code snippets within <pre> </pre> tags and use spaces for indentation.
comments powered by Disqus

Perl 6 Tricks and Treats newsletter

Register to the free newsletter now, and get updates and news.