qse/ase/cmd/awk/t30.awk
2008-03-21 03:49:53 +00:00

4 lines
201 B
Awk

#{ "dir/w/p" | getline; print $0; print "flush(dir/w/p)=", fflush("dir/w/p"); }
#{ print | "grep Asia"; fflush("grep Asia"); }
{ print | "grep Asia"; print "flush(grep Asia)=", fflush("grep Asia"); }