while (<FILE1) {
    ...
        open (FILE2,'<',"name");
        while(<FILE2>) {
        ...
        }
        close FILE2;
    }