Return to misc.t CVS log | Up to [local] / palm / Palm-Keyring / t |
1.1 ! andrew 1: #!/usr/bin/perl -T ! 2: # $RedRiver: keyring.t,v 1.17 2007/09/13 15:41:36 andrew Exp $ ! 3: use strict; ! 4: use warnings; ! 5: ! 6: use Test::More tests => 3; ! 7: ! 8: BEGIN { ! 9: use_ok( 'Palm::Keyring' ); ! 10: } ! 11: ! 12: ok( Palm::Keyring::_hexdump('hex:', '12345'), '_hexdump' ); ! 13: ok( Palm::Keyring::_bindump('bin:', '12345'), '_bindump' );