perl script not giving output

[steadybompipi]

This node falls below the community's threshold of quality. You may see it by logging in.

[Fletch]

As anyone can obviously see from the ample code you've provided the problem is on line 17. I mean duh.

(Hint: How (Not) To Ask A Question)

[haoess]

Please note that some shells on some OS' redirect only some output (namely only STDOUT) when using >. Output produced by warn, die et al. is normally not printed to STDOUT, but STDERR. To redirect this output to your logfile (on some shells), you have to

$ ./abcd.pl > file.log 2>&1

-- Frank

[TedPride]

If your Perl script produces the wrong line endings for your OS, you may end up with the appearance of a single line of output when there are in fact many, especially when using the cat command or similar from the command line. I've run into this before.