here i want to compare X1 with Y1 from coulmn A to F, if they match exactly then i would like call them as mono else poly but either of X1 or Y1 contains any of these characters -/-,z/z across all columns i would like to consider them as mono even though second row contains different characters.Please see my attached file for better understanding there i worked above procedure clearly. Now i want to compare other rows of data from A to F (I have data of 16 rows below the Y1 in my attached file) to Y1 values from A to F with the rest of values in that coulmn( upto 16 cells in pedigree column) if they match then my score will be 1 else 0, then i would like to make sum from only columns contains POLY tag. I did some basic work for this in perl and i structed some where can any one please help to solve this. This ia my code,

use strict; use warnings; my $file = 'perl.csv'; open my $info, $file or die "Could not open $file: $!";