version 1.11, 2008/09/18 02:50:25 |
version 1.12, 2008/09/18 02:51:09 |
|
|
#!/usr/bin/perl -T |
#!/usr/bin/perl -T |
# $RedRiver: keyring5.t,v 1.10 2008/09/18 01:47:37 andrew Exp $ |
# $RedRiver: keyring5.t,v 1.11 2008/09/18 01:50:25 andrew Exp $ |
use strict; |
use strict; |
use warnings; |
use warnings; |
|
|
|
|
my $password = '12345'; |
my $password = '12345'; |
my $new_password = '54321'; |
my $new_password = '54321'; |
|
|
my $original_accts = [ |
my $original_accts = [ |
{ 0 => { |
{ 0 => { |
'label_id' => 0, |
'label_id' => 0, |
'data' => '', |
'data' => '', |
'label' => 'name', |
'label' => 'name', |
'font' => 0, |
'font' => 0, |
|
}, |
|
2 => { |
|
'label_id' => 2, |
|
'data' => 'only password is set', |
|
'label' => 'password', |
|
'font' => 0, |
|
}, |
|
3 => { |
|
'label_id' => 3, |
|
'data' => { |
|
'month' => 1, |
|
'day' => 1, |
|
'year' => 107 |
}, |
}, |
2 => { |
'label' => 'lastchange', |
'label_id' => 2, |
'font' => 0, |
'data' => 'only password is set', |
} |
'label' => 'password', |
}, |
'font' => 0, |
{ 0 => { |
}, |
'label_id' => 0, |
3 => { |
'data' => 'test', |
'label_id' => 3, |
'label' => 'name', |
'data' => { |
'font' => 0, |
'month' => 1, |
|
'day' => 1, |
|
'year' => 107 |
|
}, |
|
'label' => 'lastchange', |
|
'font' => 0, |
|
} |
|
}, |
}, |
{ 0 => { |
2 => { |
'label_id' => 0, |
'label_id' => 2, |
'data' => 'test', |
'data' => 'abcd1234', |
'label' => 'name', |
'label' => 'password', |
'font' => 0, |
'font' => 0, |
|
}, |
|
3 => { |
|
'label_id' => 3, |
|
'data' => { |
|
'month' => 1, |
|
'day' => 11, |
|
'year' => 107 |
}, |
}, |
2 => { |
'label' => 'lastchange', |
'label_id' => 2, |
'font' => 0, |
'data' => 'abcd1234', |
|
'label' => 'password', |
|
'font' => 0, |
|
}, |
|
3 => { |
|
'label_id' => 3, |
|
'data' => { |
|
'month' => 1, |
|
'day' => 11, |
|
'year' => 107 |
|
}, |
|
'label' => 'lastchange', |
|
'font' => 0, |
|
}, |
|
255 => { |
|
'label_id' => 255, |
|
'data' => 'This is a short note.', |
|
'label' => 'notes', |
|
'font' => 0, |
|
} |
|
}, |
}, |
{ 0 => { |
255 => { |
'label_id' => 0, |
'label_id' => 255, |
'data' => '', |
'data' => 'This is a short note.', |
'label' => 'name', |
'label' => 'notes', |
'font' => 0, |
'font' => 0, |
|
} |
|
}, |
|
{ 0 => { |
|
'label_id' => 0, |
|
'data' => '', |
|
'label' => 'name', |
|
'font' => 0, |
|
}, |
|
2 => { |
|
'label_id' => 2, |
|
'data' => 'password (date is 2/2/07)', |
|
'label' => 'password', |
|
'font' => 0, |
|
}, |
|
3 => { |
|
'label_id' => 3, |
|
'data' => { |
|
'month' => 1, |
|
'day' => 2, |
|
'year' => 107 |
}, |
}, |
2 => { |
'label' => 'lastchange', |
'label_id' => 2, |
'font' => 0, |
'data' => 'password (date is 2/2/07)', |
|
'label' => 'password', |
|
'font' => 0, |
|
}, |
|
3 => { |
|
'label_id' => 3, |
|
'data' => { |
|
'month' => 1, |
|
'day' => 2, |
|
'year' => 107 |
|
}, |
|
'label' => 'lastchange', |
|
'font' => 0, |
|
} |
|
} |
} |
]; |
} |
|
]; |
|
|
foreach my $cipher ( 0 .. 3 ) { |
foreach my $cipher ( 0 .. 3 ) { |
|
|