gistfile1.txt

    method print (IO $io, *@fld) returns Bool {
        my @f;
        if (@fld.elems == 1 && @fld[0].^name ~~ /Array/) {
            for @fld[0] -> $f {
                ("# ADD "~$f.perl).say;
                @f.push ($f);
                }
            }
        else {
            @f = @fld;
            }
        #@f.perl.say;
        self.combine (@f) or return False;
        $io.print (self.string);
        return True;
        }