bash awk

Ответ от Extrn[гуру]
$c экранируется одинарными кавычками, в вашем примере нужно делать примерно так
....
awk "{for(i=1;i<=NF;i++)
if($i==$($c))
printf $i;
printf "
";}"
....
но поставленную задачу лучше будет решить вот так:
script.awk:
BEGIN {
for (i = 1; i < ARGC; i++) {
lines[ARGV[ i ]] = 1;
delete ARGV[ i ];
}
}
{ if (lines[NR]) {print} }
# awk -f script.awk 1 2 4 6 < /etc/passwd
root:x:0:0:root:/root:/bin/bash
bin:x:1:1:bin:/bin:/sbin/nologin
adm:x:3:4:adm:/var/adm:/sbin/nologin
sync:x:5:0:sync:/sbin:/bin/sync
однако вместо sh+awk проще будет использовать perl
1) строки выводятся в порядке появления без повторов
#!/usr/bin/perl
my %lines;
$lines{$_} = 1 foreach @ARGV;
while(<STDIN>) {
print if $lines{$.};
}
2) строки выводятся в строгом порядке, необходимое количество раз
#!/usr/bin/perl
my %lines;
$lines{$_} = 1 foreach @ARGV;
while(<STDIN>) {
$lines{$.} = $_ if $lines{$.};
}
print $lines{$_} foreach(@ARGV);
3) то же, что и в предыдущем варианте, но данные перед обработкой загружаются в память целиком (подходит для небольших файлов)
#!/usr/bin/perl
my @strings = <STDIN>;
print $strings[$_ - 1] foreach(@ARGV);
если что непонятно - пишите.
PS: побольше бы таких вопросов 🙂
extrn
Гуру
(3991)
всегда пожалуйста 🙂