Note! This site is about Perl 6.
If you are looking for a solution for the current production version of Perl 5, please check out
the Perl 5 tutorial.
tutorial/files/read_file.p6
#!/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.
The Perl 6 Tricks and Treats newsletter has been around for a while.
If you are interested to get special notification when there is new content
on this site, it is the best way to keep track:
This is a newsletter temporarily running on my personal site (szabgab.com) using Mailman,
till I implement an alternative system in Perl 6.
Written by Gabor Szabo
