main::generate() called too early to check prototype at Index.pl line 52. Name "main::Recr" used only once: possible typo at Index.pl line 69. Name "main::Before" used only once: possible typo at Index.pl line 97. Name "main::Forum" used only once: possible typo at Index.pl line 71. Name "main::Sch" used only once: possible typo at Index.pl line 33. Name "main::Login" used only once: possible typo at Index.pl line 73. Name "main::Guide" used only once: possible typo at Index.pl line 70. Name "main::GInfo" used only once: possible typo at Index.pl line 68. Name "main::Hist" used only once: possible typo at Index.pl line 72. Use of uninitialized value in read at Database.pl line 280. Use of uninitialized value in string eq at Index.pl.
I wonder, is it possible that a portion of the script exists in a seperate file, and you failed to upload that file? It almost sounds like there's a file that you "do" into your script, which contains several subroutine definitions. I'm surprised that, if this hypothetical file doesn't exist on the new server, you're not getting an error message relating to the do command, but in that regard it's also possible that the do is held within an eval to trap errors.
You're also not using strict, are you?
Dave
perlmonks.org content © perlmonks.org and davido, FeraliX
prlmnks.org © 2006 edmund von der burg (eccles & toad)
v 0.03