t/01-import.t

   1 #!perl -T
   2
   3 use strict;
   4 use warnings;
   5
   6 use Test::More tests => 4;
   7
   8 require Bit::MorseSignals;
   9
  10 for (qw/BM_DATA_AUTO BM_DATA_PLAIN BM_DATA_UTF8 BM_DATA_STORABLE/) {
  11  eval { Bit::MorseSignals->import($_) };
  12  ok(!$@, 'import ' . $_);
  13 }