toychain/t/eckey0.t

BEGIN { if (-e $ENV{SITE}.'/lib') { use lib $ENV{SITE}.'/lib'; } }

use ECKeys qw(eckeygen);
use YAML::Syck qw(Dump);

my $id = eckeygen('tb','Test Bot');

printf "keys: %s\n",Dump($ECKeys::keys);

exit $?;

1;