C:\Documents and Settings\Owner\Desktop>perl -d n13.pl
Name "main::OUTPUT" used only once: possible typo at n13.pl line 39 (#1)
    (W once) Typographical errors often show up as unique variable names.
    If you had a good reason for having a unique name, then just mention it
    again somehow to suppress the message.  The our declaration is
    provided for this purpose.

    NOTE: This warning detects symbols that have been used only once so $c, @c,
    %c, *c, &c, sub c{}, c(), and c (the filehandle or format) are considered
    the same; if a program uses $c only once but also uses any of the others it
    will not trigger this warning.

Attempt to free non-existent shared string 'ì‚', Perl interpreter: 0x7331ad4 at
 (eval 2)[C:/Perl/lib/DynaLoader.pm:225] line 1, <INPUT> line 3.
Attempt to free non-existent shared string 'LineNumber', Perl interpreter: 0x733
1ad4 at (eval 2)[C:/Perl/lib/DynaLoader.pm:225] line 1, <INPUT> line 3.
Attempt to free non-existent shared string 'SourceFile', Perl interpreter: 0x733
1ad4 at (eval 2)[C:/Perl/lib/DynaLoader.pm:225] line 1, <INPUT> line 3.
Attempt to free non-existent shared string 'WatchList', Perl interpreter: 0x7331
ad4 at (eval 2)[C:/Perl/lib/DynaLoader.pm:225] line 1, <INPUT> line 3.
Attempt to free non-existent shared string 'Command', Perl interpreter: 0x7331ad
4 at (eval 2)[C:/Perl/lib/DynaLoader.pm:225] line 1, <INPUT> line 3.
Free to wrong pool 59184e0 not 235c78 at (eval 2)[C:/Perl/lib/DynaLoader.pm:225]
 line 1, <INPUT> line 3.

C:\Documents and Settings\Owner\Desktop>