format FILE =
@<<<<<<<<<@<<<<<<<<@<<<<<<<<<
@foo
.

for my $line (@LoL) {
   @foo = @$line;
   write FILE;
}