☰

usando awk para fazer correspondências exatas

tag-icon • tag-icon bash awk
usando awk para fazer correspondências exatas

só estou me perguntando como podemos usar o awk para fazer correspondências exatas.

por exemplo

$ cal 09 09 2009
   September 2009
Su Mo Tu We Th Fr Sa
   1  2  3  4  5
6  7  8  9 10 11 12
13 14 15 16 17 18 19
20 21 22 23 24 25 26
27 28 29 30



$ cal 09 09 2009 | awk '{day="9"; col=index($0,day); print col }'
17
0
0
11
20
0
8
0

Como você pode ver, o comando acima gera o número de índice de todas as linhas que contêm a string/número "9", existe uma maneira de fazer com que o awk produza o número de índice apenas na 4ª linha da saída cal acima.??? pode ser uma solução ainda mais elegante?

Estou usando o awk para obter o nome do dia usando o comando cal. aqui está toda a linha de código:

     $ dayOfWeek=$(cal $day $month $year | awk '{day='$day'; split("Sunday Monday Tuesday Wednesday Thursday Friday Saturday", array); column=index($o,day); dow=int((column+2)/3); print array[dow]}')

O problema com o código acima é que, se várias correspondências forem encontradas, obtenho vários resultados, enquanto desejo que ele produza apenas um resultado.

Obrigado!

Responder1

Você poderia grepobter a saída calpara fornecer apenas uma linha:

$ cal 09 09 2009 | grep -E '(^9 | 9 | 9$)' | awk ...

O grep corresponde a um dos seguintes:

  • Um 9 seguido por um espaço no início da linha
  • Um 9 cercado por espaços
  • Um espaço seguido por um 9 no final da linha.

Como isso funciona para você?

Responder2

Eu faria isso com algo como

dayOfWeek="$(cal $month $year |
             awk -v day=$day \
                'BEGIN {split("Sunday Monday Tuesday Wednesday Thursday Friday Saturday", days)}
                 NR > 2 {for (i = 1; i <= NF; i++) {if ($i == day) {print days[i]}}}')"

Aqui, BEGINé executado no início para configurar o daysarray; o outro padrão é acionado nas linhas 2 e superiores (ignorando o cabeçalho), percorre as colunas até encontrar daye, em seguida, usa o número da coluna para consultar o dia da semana. $in awké o operador de referência de campo; assim como $1o primeiro campo, $no campo é numerado pelo valor de n. Também estou passando $day do shell para o script com a atribuição no início da awklinha. NRé o número do registro (número da linha); NFé o número de campos na linha. (Você pode definir RSe FS, respectivamente, para alterar o que separa registros e campos, respectivamente.)

(As barras invertidas e as novas linhas após o pipe |são apenas para maior clareza e para evitar a rolagemtambémmuito.)

Desta vez foi testado.

Responder3

o script nesta página faz exatamente isso

http://www.computing.net/answers/unix/find-the-day-of-week-using-awk/5243.html

Responder4

Experimente:

cal 09 2009 | awk -v "num=9" '
    BEGIN {
        OFS="\t";
        day=" ?[^0-9]" num "([^0-9]|$)"
    }
    NR==2 {dow = $0}
    $0 ~ day {
        col=match(" " $0, day);
        print $0, col, substr(dow,col,2)
    }'

Tudo em uma linha:

cal 09 2009 | awk -v "num=9" 'BEGIN {OFS="\t"; day=" ?[^0-9]" num "([^0-9]|$)"} NR==2 {dow = $0} $0 ~ day {col=match(" " $0, day); print $0, col, substr(dow,col,2) }'

Demonstração:

$ for i in {1..30}; do cal 09 2009 | awk -v "num=$i" 'BEGIN {OFS="\t"; day=" ?[^0-9]" num "([^0-9]|$)"} NR==2 {dow = $0} $0 ~ day {col=match(" " $0, day); print $0, num, col, substr(dow,col,2) }'; done
       1  2  3  4  5    1       7       Tu
       1  2  3  4  5    2       10      We
       1  2  3  4  5    3       13      Th
       1  2  3  4  5    4       16      Fr
       1  2  3  4  5    5       19      Sa
 6  7  8  9 10 11 12    6       1       Su
 6  7  8  9 10 11 12    7       4       Mo
 6  7  8  9 10 11 12    8       7       Tu
 6  7  8  9 10 11 12    9       10      We
 6  7  8  9 10 11 12    10      13      Th
 6  7  8  9 10 11 12    11      16      Fr
 6  7  8  9 10 11 12    12      19      Sa
13 14 15 16 17 18 19    14      4       Mo
13 14 15 16 17 18 19    15      7       Tu
13 14 15 16 17 18 19    16      10      We
13 14 15 16 17 18 19    17      13      Th
13 14 15 16 17 18 19    18      16      Fr
13 14 15 16 17 18 19    19      19      Sa
20 21 22 23 24 25 26    21      4       Mo
20 21 22 23 24 25 26    22      7       Tu
20 21 22 23 24 25 26    23      10      We
20 21 22 23 24 25 26    24      13      Th
20 21 22 23 24 25 26    25      16      Fr
20 21 22 23 24 25 26    26      19      Sa
27 28 29 30             28      4       Mo
27 28 29 30             29      7       Tu
27 28 29 30             30      10      We

Aqui está uma melhoria no script ao qual Mohamed vinculou:

cal 09 2009 | awk -v "d=9" 'NR==2 {split($0, dow)} NR == 3 {print $0, d, dow[7 - ($NF + 35 - d) % 7]}'

Não há necessidade de headum tailmonte de ifdeclarações.

informação relacionada