Bug#353275: quick security fix

[Amos Shapira]

Maybe not a critical fix but the patch opens files with:

open(SOURCE, "< $file")

where is should actually use:

open(SOURCE, '<', $file)

--Amos