i need to know where to put a new line in.........i keep getting errors......?
here is what the code looks like, if anyone can help with the newline....i 
would much appreciate it.

#!/usr/bin/perl -w

$file = 'dnsbills.06-09-2001';

open FILE, $file;
@lines = <FILE>;
close (FILE);

for ($line=0;$line <=$#lines;$line++){
        if ($lines[$line] =~ /^Reg Date/) {
                print STDERR $lines[$line+2];
                @columns = split " ", $lines[$line+2];
                print $columns[1]; 
                }
        }


-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to