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) }'
Demo:
$ 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 se 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 head
, tail
ou um monte de if
declarações.