#! /usr/bin/env perl6

sub MAIN ($file-name)
{
 say slurp $file-name, enc => "latin1";
}