perl -e "my $lines1 = 7; my $lines2=8; if ($lines1 eq $lines2) {print 'lines are eq';} else {print 'wtf';}"
wtf

perl -e "my $lines1 ='foo'; my $lines2='bar'; if ($lines1 eq $lines2) {print 'lines are eq';} else {print 'wtf';}"
wtf

perl -e "my $lines1 ='foo'; my $lines2='foo'; if ($lines1 eq $lines2) {print 'lines are eq';} else {print 'wtf';}"
lines are eq