if($data_1 =~ m/$regex/gismx && $data_2 =~ m/$regex/gismx )
1 2 3
my $d1=$data_1 =~ m/$regex/gismx; my $d2=$data_2 =~ m/$regex/gismx; if($d1 && $d2 )