I'm trying to take input from a form ($string), look up that in a file ($inputs), get every space-separated entry on the line behind the $string, and put them in an array (@contractors).
All of that works fine.
The next step is to take the elements of that array, and look each one up in a second file ($continputs), and print out the results.
This is where I'm having the problem.

#!perl -w
use strict;
use CGI qw(:standard escapeHTML);

#############
print header(), start_html("Search Results");
############

my $string = param("submit_zip");
my $inputs = 'zip-acc.txt';

open( my $in, '<', $inputs) or die "can't open $inputs.\n";

while ( <$in> ) { 
    if ( $_ =~ m/^$string(.*)/ ) 
    { 
        print "$1\n"; 
    print br;
    print br;
    my @contractors = split(m#\s+#, $1);
        my $continputs = 'acc-addy.txt';
        my $contractors;
        foreach $contractors(@contractors)        
            {
            open( my $contin, '<', $continputs) or die "Cannot open $i
+nputs.\n";

            while ( <$contin> ) 
                    { 
                    if ( $contractors =~ m/^$string(.*)/ )     
                        { 
                    my @results = split(m#\s+#, $1);
                    print br;
                    print @results;
                        }
                     }
            close( $contin );
                }
    }
    }
close( $in ); 

############
print end_html();
############
[download]

---

---

• Are you posting in the right place? Check out Where do I post X? to know for sure.
• Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:

  <code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>

• Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
• Want more info? How to link or How to display code and escape characters are good places to start.