% zcat test.tgz | ack foo   
system("touch foo")
system("rm foo")
system("rm food")
chdir("foo")
%