my %sfi = <FILE>;

                foreach my $sfi (%sfi) {