#! /usr/bin/env perl6

sub MAIN ($file-name)
{
  .say for $file-name.IO.lines(enc => "latin1");
}