$self->{buffer} = join "\n", qq[
], $self->{buffer}, "
";