while(<INPUT>) {
        push @array = sprintf "%70s", $_;
}