Hello Craig,
Saturday, December 08, 2001, Craig Inman <[EMAIL PROTECTED]> wrote:
CI> As I'm new to perl, I'm more or less trying to write a 'nested while
CI> read' loop (atleast that is what my attempts come out to look like so
CI> far).
CI> trying something like....
CI> open (A, $list1) or die .....
my $a,$b;
CI> while(<A>)
CI> chomp;
CI> {
CI> print " $_\n"; #just so I know that it's there
$a=$_;
CI> }
CI> open(B, $list2) or die ....
CI> while(<B>)
CI> chomp;
CI> if $_ =~ ????? # this is where I'm getting lost, want to
CI> compare $_ from above (<A>) to $_ from (<B>)
$b=$_;
if $b =~ $a ....
CI> then I'm just printing my diffs so I can correc the necessary files.
Best wishes,
Maxim mailto:[EMAIL PROTECTED]
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
