or download this
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='foo'; if ($lines1 eq $lines2)
+{print 'lines are eq';} else {print 'wtf';}"
lines are eq