The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Haineko::SMTPD::Addreess - Create an email address object

DESCRIPTION

Create an simple object containing a local-part, a domain-part, and an email address.

SYNOPSIS

    use Haineko::SMTPD::Address;
    my $e = Haineko::Address->new( 'address' => 'kijitora@example.jp' );

    print $e->user;     # kijitora
    print $e->host;     # example.jp
    print $e->address;  # kijitora@example.jp

    print Data::Dumper::Dumper $e->damn;
    $VAR1 = {
          'user' => 'kijitora',
          'host' => 'example.jp',
          'address' => 'kijitora@example.jp'
        };

CLASS METHODS

new( 'address' = email-address )>

new() is a constructor of Haineko::SMTPD::Address

    my $e = Haineko::SMTPD::Address->new( 'address' => 'kijitora@example.jp' );

canonify( email-address )

canonify() picks an email address only (remove a name and comments)

    my $e = HainekoSMTPD::::Address->canonify( 'Kijitora <kijitora@example.jp>' );
    my $f = HainekoSMTPD::::Address->canonify( '<kijitora@example.jp>' );
    print $e;   # kijitora@example.jp
    print $f;   # kijitora@example.jp

INSTANCE METHODS

damn

damn() returns instance data as a hash reference

    my $e = Haineko::SMTPD::Address->new( 'address' => 'kijitora@example.jp' );
    my $f = $e->damn;

    print Data::Dumper::Dumper $f;
    $VAR1 = {
        'user' => 'kijitora',
        'host' => 'example.jp',
        'address' => 'kijitora@example.jp'
    };

REPOSITORY

https://github.com/azumakuniyuki/Haineko

AUTHOR

azumakuniyuki <perl.org [at] azumakuniyuki.org>

LICENSE

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.