Question

I have this code here

printf '$request1 = "select * from whatever where this = that and active = 1 order by something asc";\n' 
| perl -pe 's/select/SELECT/gi ; s/from/\n   FROM/gi ; s/where/\n      WHERE/gi ; s/and/\n      AND/gi ; s/order by/\n         ORDER BY/gi ; s/asc/ASC/gi ; s/desc/DESC/gi ;' 
| awk '{gsub(/\r/,"");printf "%s\n%d",$0,length($0)}'

it produce output like this currently

$request1 = "SELECT * 
22   FROM whatever 
17      WHERE this = that 
24      AND active = 1 
21         ORDER BY something ASC";

I would like to take the count of the first line (22) and add that amount of whitespace to each additional line.

Answer 1

Assuming that you don’t want to print the numbers, change your AWK command to:

awk 'NR == 1 {pad = length($0); print} NR > 1 {gsub(/\r/,""); printf "%*s%s\n", pad, " ", $0}'

Output:

$request1 = "SELECT * 
                         FROM whatever 
                            WHERE this = that 
                            AND active = 1 
                               ORDER BY something ASC";