#!/usr/bin/perl6 for (1..3){ print "$_\n"; }