use strict; package webblocks; 1; # LOADING THIS MODULE in index.cgi returns UNDEF || FALSE without this sub print_xmlheader { return "\n"; } sub print_xmldtd { return "
\n"; } ####
print "content-type:text/html; charset=utf-8\n\n";
use lib ('./');
use pageblocks;
print pageblocks::print_xmlheader();
print pageblocks::print_xmldtd();
...