use strict;
use warnings;

open(A,">Result.txt") or die "$!";
while(<DATA>) {
    printf A "%-10s%-7s%-8s\n",split
}

close(A)
__DATA__
The Early Year
Five New Swine