(db_mask) SELECT plugin_code FROM plugins WHERE pluginname=foo plugin_code (/db_mask) #### [present_code] (db_mask) SELECT plugin_code FROM plugins WHERE pluginname=foo plugin_code (/db_mask) [/present_code] #### present_code => sub { my $data = $_[0]; $data =~ s@&lab;@common/lab@gs; $data =~ s@&rab;@common/rab@gs; $data =~ s@&lsb;@common/lsb@gs; $data =~ s@&rsb;@common/rsb@gs; $data =~ s@&lcb;@common/lcb@gs; $data =~ s@&rcb;@common/rcb@gs; return $data; } #### use aXML::Warnings; my $plugins = { foo => sub { "what a foo" }, b => sub { "I pity the foo" }, inc => sub { "wanna game of foos-ball?" }, d => sub { "I've run out of foo jokes" } }; #### Warning: plugin "b" conflicts with HTML tag "b" at line 8. Warning: plugin "inc" conflicts with aXML tag "inc" at line 10. Warning: plugin "d" conflicts with aXML tag "db_mask" reserved markup at line 12.