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