|
|
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' );