Add the following packages libalgorithm-diff-perl libspiffy-perl libtext-diff-perl...
[pkg-perl] / deb-src / libspiffy-perl / libspiffy-perl-0.30 / t / filter3.t
1 use lib 't', 'lib';
2 use strict;
3 use warnings;
4
5 package BOX;
6 use Spiffy -Base;
7
8 package main;
9 use Test::More tests => 3;
10
11 is(scalar <BOX::DATA>, "one\n");
12 is(scalar <BOX::DATA>, "two\n");
13 is(scalar <BOX::DATA>, "three\n");
14
15 sub foo {
16     $self->foo;
17 }
18
19 package BOX;
20 __DATA__
21 one
22 two
23 three