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

NAME

Net::IPMessenger::EncryptOption - encrypt option definition

SYNOPSIS

    use Net::IPMessenger::EncryptOption;

    my $option = Net::IPMessenger::EncryptOption->new;
    $option->set_rsa_1024->set_blowfish_128;

DESCRIPTION

This defines IP Messenger encrypt and option flags. This also gives you accessors of those option flags.

METHODS

new

This creates object and return it. if argument is given and it looks like number, store it and use as default option value.

get_option

Returns option value.