added qse_awk_rtx_callwithstrs()

This commit is contained in:
2012-10-18 14:11:59 +00:00
parent e2f152c927
commit 3cec861547
9 changed files with 168 additions and 20 deletions

View File

@ -2419,6 +2419,41 @@ that is wonderful
hello world 45
1
--------------------------------------------------------------------------------
[CMD] qseawk -m 500000 --newline=on --extraops=on -d- -f lang-048.awk </dev/stdin 2>&1
--------------------------------------------------------------------------------
function int2ip (__p0, __p1, __p2)
{
__p1 = (__p0 & 255);
__p0 = (__p0 >> 8);
for (; (__p2 < 3); (__p2)++)
{
__p1 = (((__p0 & 255) ".") __p1);
__p0 = (__p0 >> 8);
}
return __p1;
}
function ip2int (__p0)
{
ret = 0;
n = split(__p0,a,".");
for (x = 1; (x <= n); (x)++)
ret = ((ret << 8) | a[x]);
return ret;
}
BEGIN {
print int2ip(ip2int("255.255.255.0"));
print int2ip(ip2int("255.0.255.0"));
print int2ip(ip2int("127.0.0.1"));
print int2ip(ip2int("192.168.1.1"));
}
255.255.255.0
255.0.255.0
127.0.0.1
192.168.1.1
--------------------------------------------------------------------------------
[CMD] qseawk -m 500000 --newline=on -F: -f columnate.awk passwd.dat </dev/stdin 2>&1
--------------------------------------------------------------------------------
root x 0 0 root /root /bin/bash