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