diff options
Diffstat (limited to 'lib/Data/QRCode/Result.pm')
-rw-r--r-- | lib/Data/QRCode/Result.pm | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/lib/Data/QRCode/Result.pm b/lib/Data/QRCode/Result.pm index 10c79d0..9821868 100644 --- a/lib/Data/QRCode/Result.pm +++ b/lib/Data/QRCode/Result.pm @@ -10,6 +10,18 @@ use Data::QRCode::Result::Inline C => ( typemaps => 'typemap', ); +=head1 SYNOPSIS + + use Data::QRCode::Result; + + my $qr = Data::QRCode::Result->new(build_a_qrcode_input()); + + print $qr->data_at(1,1); + +=method C<new> + +=cut + sub new { my ($class, $input) = @_; my $self = QRcode_encodeInput($input); @@ -32,6 +44,10 @@ sub _data_hash { }; } +=method C<data_at> + +=cut + sub data_at { my ($self,$x,$y) = @_; my $width = $self->width; @@ -41,6 +57,15 @@ sub data_at { return _data_hash($self->_data_at($x,$y)); } +=method C<version> + +=method C<width> + +=for Pod::Coverage +QRcode_encodeInput + +=cut + 1; __DATA__ |