Select Code to Download

$cnt=0;                       #We want 1st of 2 records.
while (<PHOTO_IN>) {          #Read Photo...
...
        ++$cnt;               # Bump count to skip photo.
      }
   }

$photo_header = <PHOTO_IN>;