Select Code to Download

# open FILE
while(<FILE>) {
  # The []'s make an anonymous array, so each element
...
}

print "Yep.\n" if $lines[0][0] eq 'foo'; # it will