Help for this page
#sub _DBLoad \{
eval <<'__EOI__'; ... __EOI__
print q{ foo \{ \} \\\\ bar };
print <<'__EOI__'; foo { } \\ bar __EOI__