foreach my $file (@files) {
        chomp $file;
         my $filename = "$file";
           (open(my $IF, '<', $filename));
            my @entry         = <$IF>;
            $lastentry    = $entry[-1];
            close $IF;
            chomp $lastentry;
            my @record = split(':', $lastentry);
            my $id        = $record[0];
            my $name              = $record[1];
            my $street        = $record[2];
            my $city              = $record[3];
            my $state            = $record[4];
            my $status            = $record[5];
  if (some condition like $status is active)(
           do something.....
)