for (@lines) {
    print FILE $_;
}
##</code><code>##

print FILE @lines;