qse/ase/test/awk/t9.awk

27 lines
357 B
Awk
Raw Normal View History

2006-06-21 11:45:26 +00:00
BEGIN
{
while (("xxx /p" | getline var) > 0) ;
while (("dir /w" | getline var) > 0) ;
while ((getline var < "t9.awk") > 0) ;
zzz = close ("xxx /p");
/*
while ("ls -l" | getline var)
{
"ls -l" | getline x;
print var; print x;
}
while (getline < "/etc/passwd")
{
print $0;
}
while (getline x < "/etc/shadow")
{
print x;
}
*/
}