AWK 3.1.7 - множественные петли в один для

Question

Я пытаюсь сортировать 2 массивов с помощью следующего кода:

n = asorti (pacben,pacsor) 
m = asorti (pacben2,pacsor2) 

Мне нужно сортировать их, предпочтительнее вместе. Я знаю, что я могу сделать, каждый в отдельности со следующим:

n = asorti (pacben,pacsor) 
for (p = 1;p <= n; p++) { 
blah 
} 
m = asorti (pacben2,pacsor2) 
for (p2 =1;p2 <= m; p2++) { 
blah 
} 

, но когда я пытаюсь следующее:

n = asorti (pacben,pacsor) 
m = asorti (pacben2,pacsor2) 
for (p = 1;p <= n;p++ && p2 = 1;p2 <= m;p2++) { 
blah 
} 

Я получаю следующее сообщение об ошибке:

awk: cmd. line:25:       for (p = 1;p <= n;p++ && p2 = 1;p2 <= m; p2++) { 
awk: cmd. line:25:              ^syntax error 
awk: cmd. line:25:       for (p = 1;p <= n;p++ && p2 = 1;p2 <= m; p2++) { 
awk: cmd. line:25:                 ^syntax error 

Любые и вся помощь будут оценены.

Answer 1

В C, вы бы изменить:

for (p = 1;p <= n;p++ && p2 = 1;p2 <= m;p2++) { 

в:

for (p = 1, p2 = 1; p <= n && p2 <= m; p1++, p2++) { 

Это один из стандарта использует для оператора запятая. Однако оказывается, что awk не принимает оператор запятой.

Mac OS X (BSD) awk:

$ awk -v n=2 -v m=3 'BEGIN { for (p = 1, p2 = 1; p <= n && p2 <= m; p1++, p2++) print p1, p2}' 
awk: syntax error at source line 1 
context is 
    BEGIN { for (p = >>> 1, <<< 
awk: illegal statement at source line 1 
awk: illegal statement at source line 1 
$ 

GNU awk:

$ awk -v n=2 -v m=3 'BEGIN { for (p = 1, p2 = 1; p <= n && p2 <= m; p1++, p2++) print p1, p2}' 
awk: cmd. line:1: BEGIN { for (p = 1, p2 = 1; p <= n && p2 <= m; p1++, p2++) print p1, p2} 
awk: cmd. line:1:     ^syntax error 
awk: cmd. line:1: BEGIN { for (p = 1, p2 = 1; p <= n && p2 <= m; p1++, p2++) print p1, p2} 
awk: cmd. line:1:             ^syntax error 
$ 

Спецификация POSIX для awk не включает в себя оператор запятой в списке операторов.

Вы можете использовать:

$ awk -v n=2 -v m=3 'BEGIN { for (p1 = p2 = 1; p1 <= n && p2 <= m; p1++ && p2++) print p1, p2}' 
1 1 
2 2 
$ 

Это использует тот факт, что p1 и p2 инициализируются к тому же значению, и что обеим p1 и p2 отличны от нуля в инкременте части петли.

Answer 2

Держите его простым. Там в различные возможные решения в зависимости от то, что вы действительно хотите и что blah может делать, но на основе вы принимать @JonathanLeffer's answer, это должно быть то, что вы хотите:

n = asorti (pacben,pacsor) 
m = asorti (pacben2,pacsor2) 
for (p = 1;p <= n && p <=m; p++) { 
    blah 
} 

но также рассмотреть вопрос о том, как работать с массивами разных размеров:

$ cat tst.awk 
BEGIN{ 
    n = split("A C E",a) 
    m = split("B D F G H",b) 
    for (p=1;p<=n && p<=m;p++) { 
     print a[p] ORS b[p] 
    } 
    for (;p <= (n > m ? n : m);p++) { 
     print (n > m ? a[p] : b[p]) 
    } 
} 

$ awk -f tst.awk 
A 
B 
C 
D 
E 
F 
G 
H