blob: 529244861ef62f92b858d53b842f24c87d36647a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
{
for (i = 1; i <= NF; i++) {
switch ($i) {
case "+" : case "-" :
case "*" : case "/" :
case "%" : case "^" :
printf $i; break
case /[a-z]/ :
printf $i; break
case /[0-9]/ :
printf $i; break
case /[ \t]/ :
printf $i; break
default :
print " wrong character " i " th: " $i
}
}
print ""
}
|
