open(IN, "bigfile.txt"); while(){ &big_sub1($_); &big_sub2($_); }