view release on metacpan or  search on metacpan

lib/Authen/U2F/Tester/RegisterResponse.pm  view on Meta::CPAN

#
# This file is part of Authen-U2F-Tester
#
# This software is copyright (c) 2017 by Michael Schout.
#
# This is free software; you can redistribute it and/or modify it under
# the same terms as the Perl 5 programming language system itself.
#
package Authen::U2F::Tester::RegisterResponse;
$Authen::U2F::Tester::RegisterResponse::VERSION = '0.03';
# ABSTRACT: U2F Tester Registration Response

use Moose;
use strictures 2;
use MIME::Base64 qw(encode_base64url);
use namespace::autoclean;

with qw(Authen::U2F::Tester::Role::Response);


sub registration_data {
    return encode_base64url(shift->response);
}

__PACKAGE__->meta->make_immutable;

__END__

=pod

=head1 NAME

Authen::U2F::Tester::RegisterResponse - U2F Tester Registration Response

=head1 VERSION

version 0.03

=head1 SYNOPSIS

 use Authen::U2F::Tester;

 my $tester = Authen::U2F::Tester->new(...);

 my $res = $tester->register(...);

 print $res->client_data;
 print $res->registration_data;

 # print the binary response in hex format
 print unpack 'H*', $res->response;

=head1 DESCRIPTION

This class represents a successful response to a registration request.

=head1 METHODS

=head2 registration_data(): string

Get the registration data from the tester's register request, in
Base64 URL encoding.

=head1 SEE ALSO

=over 4

=item *

L<Authen::U2F::Tester::Role::Response>

=item *

L<Authen::U2F::Tester>

=back