Add function for creating class attributes

[chaz/p5-File-KDBX] / lib / File / KDBX / Key / Password.pm

diff --git a/lib/File/KDBX/Key/Password.pm b/lib/File/KDBX/Key/Password.pm
index 84f8e3873ba658c55597d988def5a565cd3e8c34..032de09d64337c5dc8096cdf032eeb361092c9e1 100644 (file)
--- a/lib/File/KDBX/Key/Password.pm
+++ b/lib/File/KDBX/Key/Password.pm
@@ -7,10 +7,10 @@ use strict;
 use Crypt::Digest qw(digest_data);
 use Encode qw(encode);
 use File::KDBX::Error;
-use File::KDBX::Util qw(erase);
+use File::KDBX::Util qw(:class erase);
 use namespace::clean;
 
-use parent 'File::KDBX::Key';
+extends 'File::KDBX::Key';
 
 our $VERSION = '999.999'; # VERSION
 
@@ -24,3 +24,18 @@ sub init {
 }
 
 1;
+__END__
+
+=head1 SYNOPSIS
+
+    use File::KDBX::Key::Password;
+
+    my $key = File::KDBX::Key::Password->new($password);
+
+=head1 DESCRIPTION
+
+A password key is as simple as it sounds. It's just a password or passphrase.
+
+Inherets methods and attributes from L<File::KDBX::Key>.
+
+=cut