|
|
1.1 ! andrew 1: #!/usr/bin/perl
! 2: use strict;
! 3: use warnings;
! 4: use diagnostics;
! 5:
! 6: use lib 'lib';
! 7: use Palm::Keyring;
! 8:
! 9: my $pdb = new Palm::Keyring;
! 10:
! 11: use YAML;
! 12:
! 13: $pdb->Load("Keys-Gtkr.PDB");
! 14: #$pdb->Decrypt('12345');
! 15:
! 16: print Dump $pdb;
! 17: