Errors Output
  1. sdbm store returned -1, errno 28, key "Started" at /usr/local/share/perl5/MLDBM.pm line 162. , /usr/local/share/perl5/Apache/ASP.pm line 1522
Debug Output
  1. RUN ASP (v2.63) for /usr/local/proj/asp/eg/xml_subs.asp
  2. GlobalASA package Apache::ASP::Demo
  3. creating dbm for file /tmp/asp_demo/server/internal, db SDBM_File, serializer: Data::Dumper
  4. creating dbm for file /tmp/asp_demo/server/application, db SDBM_File, serializer: Data::Dumper
  5. session id from cookie: 02d76bdef69afea6d5180f34726792b3
  6. refreshing 02d76bdef69afea6d5180f34726792b3 with timeout 1756598212
  7. creating dbm for file /tmp/asp_demo/02/02d76bdef69afea6d5180f34726792b3, db SDBM_File, serializer: Data::Dumper
  8. session not expired - time: 1756597912; timeout: 1756598212;
  9. tieing session 02d76bdef69afea6d5180f34726792b3
  10. parse file /usr/local/proj/asp/eg/xml_subs.asp
  11. parsing /usr/local/proj/asp/eg/xml_subs.asp
  12. start parse of data - 1965
  13. start parse of data - 80
  14. start parse of data - 421
  15. start parse of data - 104
  16. start parse of data - 932
  17. undefing sub Apache::ASP::Demo::__ASP__usr_local_proj_asp_eg__ml_subs_aspxde7ce669bb8455d1d7a262bea82298e2xINC code CODE(0x5562c84fa8a0)
  18. compiling into package Apache::ASP::Demo subid [Apache::ASP::Demo::__ASP__usr_local_proj_asp_eg__ml_subs_aspxde7ce669bb8455d1d7a262bea82298e2xINC]
  19. Script_OnStart
  20. executing Script_OnStart
  21. [xml_subs.asp] - Script_OnStart /usr/local/proj/asp/eg/xml_subs.asp in global.asa
  22. sdbm store returned -1, errno 28, key "Started" at /usr/local/share/perl5/MLDBM.pm line 162. , /usr/local/share/perl5/Apache/ASP.pm line 1522
  23. ASP Done Processing Apache::ASP=HASH(0x5562c854d738) - Application: Apache::ASP::Application=HASH(0x5562c854e1e0); GlobalASA: Apache::ASP::GlobalASA=HASH(0x5562c854d2e8); Internal: Apache::ASP::State=HASH(0x5562c8516938); Request: Apache::ASP::Request=HASH(0x5562c84f98a0); Response: Apache::ASP::Response=HASH(0x5562c84deb50); Server: Apache::ASP::Server=HASH(0x5562c854d8d0); Session: Apache::ASP::Session=HASH(0x5562c854e000); app_state: 1; basename: xml_subs.asp; cleanup: ARRAY(0x5562c8516ce0); compile_checksum: 3436ef45a26199e890479d9a7f0923bc; compile_includes: 1; compile_perl_count: 1; cookie_domain: ; cookie_path: /; dbg: 3; debugs_output: ARRAY(0x5562c854d960); destroy: 1; dir_config: APR::Table=HASH(0x5562c84f8f10); dirname: /usr/local/proj/asp/eg/; errors_output: ARRAY(0x5562c854db10); errs: 1; filename: /usr/local/proj/asp/eg/xml_subs.asp; global: /usr/local/proj/asp/eg//.; global_package: Apache::ASP::Demo; group_refresh: 30; headers_in: APR::Table=HASH(0x5562c84df690); http_only_session: ; includes_dir: ARRAY(0x5562c84a73b8); init_packages: ARRAY(0x5562c84d5ee8); inode_names: 0; lang_comment: #; lang_language: PerlScript; lang_module: Apache::ASP::Lang::PerlScript; lang_object: Apache::ASP::Lang::PerlScript=HASH(0x5562c85311d8); last_time: 1756597912.6818; no_cache: 0; package: Apache::ASP::Demo; paranoid_session: ; parse_config: 1; parse_file_count: 1; pod_comments: 1; r: Apache2::RequestRec=SCALAR(0x5562c854d900); remote_ip: 216.73.216.123; request_binary_read: 1; response_tied: 1; run_perl_script: SCALAR(0x5562c8516a88); search_dirs_cache: HASH(0x5562c8531190); secure_session: ; session_cookie: 1; session_count: 1; session_id: 02d76bdef69afea6d5180f34726792b3; session_serialize: ; session_state: 1; session_timeout: 300; session_url: 1; session_url_force: ; session_url_match: ; session_url_parse: 0; session_url_parse_match: ; start_time: 1756597912.67861; stat_inc: 0; stat_inc_match: 0; stat_scripts: 1; state_db: ; state_dir: /tmp/asp_demo; state_manager: 10; state_serialize: ; state_serializer: ; ua: Mozilla/5.0 AppleWebKit/537.36 (KHTML, like Gecko; compatible; ClaudeBot/1.0; +claudebot@anthropic.com); use_strict: 1; win32: 0; xml_subs_match: my:\w+; xml_subs_perl_args: 1; xml_subs_strict: ; xmlsubs_compiled_tag_long: 9; xmlsubs_compiled_tag_recurse_parse: 4; xmlsubs_compiled_tag_short: 2; xslt: 0;
  24. errors out
  25. sdbm store returned -1, errno 28, key "Started" at /usr/local/share/perl5/MLDBM.pm line 162. , /usr/local/share/perl5/Apache/ASP.pm line 1522 
ASP to Perl Script 

  -: use strict;;;use vars qw($Application $Session $Response $Server $Request);;
  -: #line 1 /usr/local/proj/asp/eg/xml_subs.asp
  1: ;;
  2: 
  3: ;  &my::include({  'src'=>'header.inc', 'title'=>"XMLSubsMatch Demo" }, ''); ; &Apache::ASP::WriteRef($main::Response, \('
  4: 
  5: This is a demonstration of the XMLSubsMatch extension which
  6: allows for the developer to construct a set of custom XML style
  7: tags for use in ASP scripts.  These tags could be used 
  8: to render entire XML documents, or even simply give some nice
  9: short cuts for use when site building.
 10: <p>
 11: 
 12: 
 13: 
 14: 
 15: 
 16: 
 17: Currently, XMLSubsMatch is set to:
 18: ')); &my::ttb({  },  &{sub{ my $out = ""; local $Response->{out} =  local $Response->{BinaryRef} = \$out; local *Apache::ASP::Response::Flush = *Apache::ASP::Response::Null; &Apache::ASP::WriteRef($main::Response, \(' 
 19:   ')); $Response->Write('['); ; &Apache::ASP::WriteRef($main::Response, \('
 20:   '.($Server->Config('XMLSubsMatch')).' 
 21:   ')); $Response->Write(']'); ; &Apache::ASP::WriteRef($main::Response, \('
 22: ')); ; ${$Response->{out}}; }} ); ; &Apache::ASP::WriteRef($main::Response, \('
 23: <p>
 24: Whatever tags XMLSubsMatch matches of the form
 25: <pre>'.(
 26: $Server->HTMLEncode('
 27:  <matchtag param1="value1" param2="value2">
 28:    text
 29:  </matchtag>
 30:   -- or --
 31:  <matchtag param1="value1" param2="value2"/>
 32: ')).'</pre>
 33: 
 34: will be parsed into perl subroutines of matchtag name with
 35: arguments and text passed in, so these subs would be called
 36: respectively for the above XMLMatchSubs:
 37: 
 38: <pre>'.($Server->HTMLEncode('
 39: &matchtag( { param1 => "value1", param2=>"value2" }, \'text\' );
 40:   -- and --
 41: &matchtag( { param1 => "value1", param2=>"value2" }, \'\');
 42: ')
 43: ).'</pre>
 44: 
 45: Note that XMLSubs tags of the form ')); &my::ttb({  }, 'foo:bar'); ; &Apache::ASP::WriteRef($main::Response, \(' will be changed into a
 46: call to ')); &my::ttb({  }, '&foo::bar()'); ; &Apache::ASP::WriteRef($main::Response, \(', so that the XML concept of tag prefix
 47: namespaces is translated to the concept of perl packages.
 48: <p>
 49: 
 50: ')); &my::table({  'width'=>200, 'title'=>"Title Box", 'border'=>3 },  &{sub{ my $out = ""; local $Response->{out} =  local $Response->{BinaryRef} = \$out; local *Apache::ASP::Response::Flush = *Apache::ASP::Response::Null; &Apache::ASP::WriteRef($main::Response, \('
 51:   <h3>XML Subs Demo</h3>
 52: 
 53:   Another table here to demo embedded XMLSubs tags:
 54:   ')); &my::table({  'border'=>1 }, '
 55:     Double Table to Show Embedded Tags
 56:   '); ; &Apache::ASP::WriteRef($main::Response, \('
 57: 
 58:   <p>
 59: 
 60:   And another embedded:
 61:   ')); &my::table({  'border'=>1 },  &{sub{ my $out = ""; local $Response->{out} =  local $Response->{BinaryRef} = \$out; local *Apache::ASP::Response::Flush = *Apache::ASP::Response::Null; &Apache::ASP::WriteRef($main::Response, \('
 62:     Another table.
 63:       ')); &my::table({  'border'=>1 },  &{sub{ my $out = ""; local $Response->{out} =  local $Response->{BinaryRef} = \$out; local *Apache::ASP::Response::Flush = *Apache::ASP::Response::Null; &Apache::ASP::WriteRef($main::Response, \('
 64:         Triply embedded XMLSubs ')); &my::ttb({  }, 'my:table'); ; &Apache::ASP::WriteRef($main::Response, \(' table.
 65:       ')); ; ${$Response->{out}}; }} ); ; &Apache::ASP::WriteRef($main::Response, \('  
 66:   ')); ; ${$Response->{out}}; }} ); ; &Apache::ASP::WriteRef($main::Response, \('  
 67: 
 68: ')); ; ${$Response->{out}}; }} ); ; &Apache::ASP::WriteRef($main::Response, \('
 69: <p>
 70: 
 71: ')); for("yellow", "red", "blue") { ; &Apache::ASP::WriteRef($main::Response, \('
 72: 	')); &my::table({  'bgcolor'=>$_, 'width'=>200, 'title'=>ucfirst($_)."Box", 'border'=>5 }, '
 73: 		Colored Box
 74: 	'); ; &Apache::ASP::WriteRef($main::Response, \('
 75: 	<p>
 76: ')); } ; &Apache::ASP::WriteRef($main::Response, \('
 77: 
 78: <p>
 79: The my::* perl subs defining the XMLSubs are located in the 
 80: global.asa.
 81: <p>
 82: 
 83: ')); &my::include({  'src'=>"footer.inc" }, ''); ;
An error has occured with the Apache::ASP script just run. If you are the developer working on this script, and cannot work through this problem, please try researching it at the Apache::ASP web site, specifically the FAQ section. Failing that, check out your support options, and if necessary include this debug output with any query.