Name "main::OUTPUT" used only once: possible typo at 1201637.pl line 34.
1201637.pl syntax OK