diplodocus.org Git - flac-archive/blob - t/two_digits.t

   1 use v5.12;
   2 use warnings;
   3
   4 use Test::More tests => 5;
   5
   6 use Test::Exception;
   7
   8 require './tags.pl';
   9 epg::flac::archive::tags->import('two_digits');
  10
  11 is two_digits(0), '00',
  12     '0 -> 00';
  13
  14 is two_digits(1), '01',
  15     '1 -> 01';
  16
  17 throws_ok { two_digits(111) } qr/111 won't fit into two digits/;
  18
  19 throws_ok { two_digits(-31) } qr/-31 won't fit into two digits/;
  20
  21 is two_digits(''), '00';