perl: problem in looping! how to get rid

view full story

http://www.unix.com – Hi i just want to open 2 files and find difference between cond1[2] and cond2[2] and if the difference is greater than or equal to some number say 2 print the lines again in 2 different files. Code: file 1 (1.txt) aqw dfr 34 poilo ggg 98 file 2  (2.txt) qww asd 28 poilo ggg 97 Code: open FILE1,"1.txt" or die "can't open file 1"; open FILE2,"2.txt" or die "can't open file 2"; open(w1,">3.txt"); open(w2,">4.txt"); while (my $line1 = <FILE1>) { chomp $line1; my @cond1 = split("\t" (HowTos)