X-Git-Url: https://git.dogcows.com/gitweb?p=chaz%2Fp5-File-KDBX;a=blobdiff_plain;f=README.md;fp=README.md;h=3b259199366b7777b2d44fe4504a46a19290a9fd;hp=defdf98efed0c02a179902d76aff8abc5ffb11e9;hb=e005d4a1bcba38408e2f8bef5b44e23e284f01bb;hpb=8e4a00010331fe5243c9550a7adce09e9e044a23

diff --git a/README.md b/README.md
index defdf98..3b25919 100644
--- a/README.md
+++ b/README.md
@@ -8,7 +8,7 @@ File::KDBX - Encrypted database to store secret text and files
 
 # VERSION
 
-version 0.902
+version 0.903
 
 # SYNOPSIS
 
@@ -29,14 +29,13 @@ my $entry = $group->add_entry(
 );
 
 # Save the database to the filesystem
-$kdbx->dump_file('passwords.kdbx', 'M@st3rP@ssw0rd!');
+$kdbx->dump_file('passwords.kdbx', 'masterpw changeme');
 
 # Load the database from the filesystem into a new database instance
-my $kdbx2 = File::KDBX->load_file('passwords.kdbx', 'M@st3rP@ssw0rd!');
+my $kdbx2 = File::KDBX->load_file('passwords.kdbx', 'masterpw changeme');
 
 # Iterate over database entries, print entry titles
-$kdbx2->entries->each(sub {
-    my ($entry) = @_;
+$kdbx2->entries->each(sub($entry, @) {
     say 'Entry: ', $entry->title;
 });
 ```
@@ -964,8 +963,7 @@ $kdbx->dump_file('mypasswords.kdbx', 'master password CHANGEME');
 my $kdbx = File::KDBX->load_file('mypasswords.kdbx', 'master password CHANGEME');
 $kdbx->unlock;  # cause $entry->password below to be defined
 
-$kdbx->entries->each(sub {
-    my ($entry) = @_;
+$kdbx->entries->each(sub($entry, @) {
     say 'Found password for: ', $entry->title;
     say '  Username: ', $entry->username;
     say '  Password: ', $entry->password;