Acme-Steganography-Image-Png

 view release on metacpan or  search on metacpan

t/grey.t  view on Meta::CPAN

1
2
3
4
5
6
7
8
9
10
#!perl -w
use strict;
 
use FindBin;
 
use lib $FindBin::Bin;
 
use Tester;
 
Tester::test_package('Acme::Steganography::Image::Png::FlashingNeonSignGrey');

t/rgb.t  view on Meta::CPAN

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#!perl -w
use strict;
 
use FindBin;
use lib $FindBin::Bin;
use Tester;
 
my $test_image = File::Spec->catfile($FindBin::Bin, 'Elsa');
ok (-e $test_image, "We have our test image '$test_image'");
 
Tester::test_package('Acme::Steganography::Image::Png::RGB::556', $test_image);
Tester::test_package('Acme::Steganography::Image::Png::RGB::323', $test_image);
Tester::test_package('Acme::Steganography::Image::Png::RGB::556FS',
                     $test_image);



( run in 0.260 second using v1.01-cache-2.11-cpan-454fe037f31 )