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