blob: 99341ac4260364d988ed69fd69ee9f6a7dae9bee (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
package Bar::Foo;
use strict;
use warnings;
use Bar::Foo::Good;
use Bar::Foo::Bad;
our $VERSION = 0.01;
sub contents {
local $/;
<DATA>
}
1;
__DATA__
__DATA__ for Bar::Foo
|