Name "main::Log" used only once: possible typo at noname.pl line 7.
print() on unopened filehandle Log at noname.pl line 7.