cp ../*/*/*/*zz*t test.pl;perl $_|&pg