debugprint ("Now entering mysub...\n");
debugprint ("parameters are @_\n");