Help for this page
print "Yep.\n" if $lines[0][0] == 'foo';
print "Yep.\n" if $lines[0][0] eq 'foo';