in reply to multiple __DATA__ && __END__
You could have a look at Inline::Files.
Hope this helps, -gjb-