Unix Command (Mac OS): cut and move rows Unix Command (Mac OS): cut and move rows shell shell

Unix Command (Mac OS): cut and move rows


macos perl bash shell unix

Using a perl one-liner

perl -lne 'push @{$l[($.-1) % 3]}, $_; }{ print "@$_" for @l' data.txt | column -t

Explanation:

Switches:

  • -l: Enable line ending processing, specifies line terminator
  • -n: Creates a while(<>){..} loop for each line in your input file.
  • -e: Tells perl to execute the code on command line.

Code:

  • push @{$l[($.-1) % 3]}, $_;: Push each line into an array modulo the line number
  • }{ print "@$_" for @l: Print the 3 element array at end of processing
  • | column -t: Even out the columns

macos perl bash shell unix

I would go with split and paste from coreutils. Try the following commands:

split -l3 infilepaste -d' ' xaa xab xac | column -t

Output:

1  a  i    4  d  iv  7  g  vii2  b  ii   5  e  v   8  h  viii3  c  iii  6  f  vi  9  i  xi

macos perl bash shell unix

Here is a oneliner:

perl -ne 'chomp; push @a,$_ if $_; unless($. % 3) {push @f,[@a]; @a = undef; shift @a} END {for my $i (@f) { for (@$i) {print "$_ "} print "\n"}}' filename.txt

output

1 a i 2 b ii 3 c iii4 d iv 5 e v 6 f vi7 g vii 8 h viii 9 i xi

Recent Posts
How can I color dots in a xy scatterplot according to column value?
How to update a claim in ASP.NET Identity?
What does {0} mean when initializing an object?
Accessing members of items in a JSONArray with Java
How to log SQL statements in Spring Boot?
Powershell Get-WebSite name parameter is ignored
How to detect scroll to bottom of html element
Java synchronized method
How to test controllers with CodeIgniter?
Detect Visual Composer
Matplotlib: Specify format of floats for tick labels
Rails join a list of strings with commas and "and" before the last