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(); ...