#!/usr/bin/perl use strict; use warnings; my $dbval1 = "35000970"; my $dbval2 = "AB00035515"; my $val1 = "35000913"; my $val2 = "11506"; if ( ( $dbval1 eq $val1 ) && ( $dbval2 eq $val2 ) ){ print "$dbval1 = $val1 && $dbval2 = $val2\n"; }