http://www.perlmonks.org?node_id=1016465


in reply to Re: Mixing documentation and data
in thread Mixing documentation and data

So you want to duplicate the data?

Replies are listed 'Best First'.
Re^3: Mixing documentation and data
by tmharish (Friar) on Feb 01, 2013 at 07:30 UTC
      But you can have pod after __DATA__
        Yes but its considered part of __DATA__ :
        use strict ; use warnings ; package FOO::Messages; while(<DATA>) { print $_ ; } sub foo{} =head1 __DATA__ This is the data stuff here. =cut 1; __DATA__ data stuff here. =head1 OtherHeading Supp =cut asdfasdfasdf
        Output:
        perl pod.pl data stuff here. =head1 OtherHeading Supp =cut asdfasdfasdf
        Of course if the OP wants to parse out the POD bits then I guess this is a solution.