#!/usr/bin/perl
#use strict;
use warnings;

open FILE,"out07.txt";

my @fields = split / /, <FILE>;
chomp @fields;
my @lines = split (/(\n)/, "@fields");
for (@lines)
{
    print @fields,"\n";
    
}