source: genesis/tools/pencontrl/awkpencontrl@ 4283

Last change on this file since 4283 was 4283, checked in by dirk, 20 years ago

tools voor pen optimalisatie

File size: 589 bytes
Line 
1$1 ~ /proxy/ {proxy=$1}
2{if ($3 == "KB/s)") {
3 print (substr($2,2,length($2)))*1000 " "proxy}
4}
5{if ($3 == "B/s)") {i = 1
6 l = 0
7 tl = length($2)
8 while( i < tl )
9 { if( substr($2,(i + 1),1) == "." )
10 { i = tl
11 }
12 else
13 {
14 l = i
15 i = i + 1
16 }
17 }
18 print "000" (substr($2,2,l)) " "proxy
19 }
20}
Note: See TracBrowser for help on using the repository browser.