Line 18, print OUT $i; should be print LOCAL $i;. OUT is not an open file handle.

After Compline,
Zaxo