"Trevor Morrison" <[EMAIL PROTECTED]> wrote in message news:[EMAIL PROTECTED] > Hi, > > I am trying to step through each line of a file that contains orders that > were place through a internet shopping cart. I have this code: > > open(ORDER,$order) or die "Error opening \"$order\": $OS_ERROR\n"; > > print "HI\n"; > while (defined($_ = <ORDER>)) { > print "Hi there \n"; > > > I am trying to test each line against a bunch of if statements and then go > onto the next order when the line matches a rag expression and then the data > for the order is dumped to MySql database. Now, when I execute the Perl > program, it will print the first "Hi", but fails to print the second "Hi > There". I know that I am missing something here, but what is it? > > TEA > > Trevor >
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
