while (defined $line = <$inputFileHandle>)
[download]

Because the  = operator has higher precedence than the defined operator you need to either enclose the assignment in parentheses:

while (defined( $line = <$inputFileHandle> ))

Or because perl does the defined test by default then just omit it and perl will do the right thing:

while ($line = <$inputFileHandle>)