Where does $line3 get assigned? It's tested for inequality on line 27 of the code you posted, but I don't see where it's being populated.

use strict 'vars'; would have caught that and turned it into a compiletime error.