IO-Socket-CLI

 view release on metacpan or  search on metacpan

META.json  view on Meta::CPAN

{
   "abstract" : "CLI for IO::Socket::INET6 and IO::Socket::SSL",
   "author" : [
      "Ashley Willis <ashley+perl@gitable.org>"
   ],
   "dynamic_config" : 0,
   "generated_by" : "Dist::Zilla version 5.020, CPAN::Meta::Converter version 2.142060",
   "license" : [
      "perl_5"
   ],
   "meta-spec" : {
      "url" : "http://search.cpan.org/perldoc?CPAN::Meta::Spec",

META.json  view on Meta::CPAN

         "requires" : {
            "Pod::Coverage::TrustPod" : "0",
            "Test::Pod" : "1.41",
            "Test::Pod::Coverage" : "1.08"
         }
      },
      "runtime" : {
         "requires" : {
            "Carp" : "0",
            "IO::Socket::INET6" : "0",
            "IO::Socket::SSL" : "0",
            "perl" : "5.006",
            "strict" : "0",
            "warnings" : "0"
         }
      },
      "test" : {
         "requires" : {
            "Test::More" : "0"
         }
      }

META.yml  view on Meta::CPAN

---
abstract: 'CLI for IO::Socket::INET6 and IO::Socket::SSL'
author:
  - 'Ashley Willis <ashley+perl@gitable.org>'
build_requires:
  Test::More: 0
configure_requires:
  ExtUtils::MakeMaker: 0
dynamic_config: 0
generated_by: 'Dist::Zilla version 5.020, CPAN::Meta::Converter version 2.142060'
license: perl
meta-spec:

META.yml  view on Meta::CPAN

    version: 0.041
  IO::Socket::CLI::SMTP:
    file: lib/IO/Socket/CLI/SMTP.pm
    version: 0.041
  IO::Socket::CLI::SMTPS:
    file: lib/IO/Socket/CLI/SMTPS.pm
    version: 0.041
requires:
  Carp: 0
  IO::Socket::INET6: 0
  IO::Socket::SSL: 0
  perl: 5.006
  strict: 0
  warnings: 0
resources:
  repository: https://gitable.org/ashley/IO-Socket-CLI.git
version: 0.041

Makefile.PL  view on Meta::CPAN

# Dist::Zilla::Plugin::MakeMaker::Awesome 0.27.
# Don't edit it but the dist.ini and plugins used to construct it.

use strict;
use warnings;

use 5.006;
use ExtUtils::MakeMaker;

my %WriteMakefileArgs = (
  "ABSTRACT" => "CLI for IO::Socket::INET6 and IO::Socket::SSL",
  "AUTHOR" => "Ashley Willis <ashley+perl\@gitable.org>",
  "CONFIGURE_REQUIRES" => {
    "ExtUtils::MakeMaker" => 0
  },
  "DISTNAME" => "IO-Socket-CLI",
  "EXE_FILES" => [],
  "LICENSE" => "perl",
  "NAME" => "IO::Socket::CLI",
  "PREREQ_PM" => {
    "Carp" => 0,
    "IO::Socket::INET6" => 0,
    "IO::Socket::SSL" => 0,
    "strict" => 0,
    "warnings" => 0
  },
  "TEST_REQUIRES" => {
    "Test::More" => 0
  },
  "VERSION" => "0.041",
  "test" => {
    "TESTS" => "t/*.t"
  }
);

my %FallbackPrereqs = (
  "Carp" => 0,
  "IO::Socket::INET6" => 0,
  "IO::Socket::SSL" => 0,
  "Test::More" => 0,
  "strict" => 0,
  "warnings" => 0
);

unless ( eval { ExtUtils::MakeMaker->VERSION(6.63_03) } ) {
  delete $WriteMakefileArgs{TEST_REQUIRES};
  delete $WriteMakefileArgs{BUILD_REQUIRES};
  $WriteMakefileArgs{PREREQ_PM} = \%FallbackPrereqs;
}

README  view on Meta::CPAN



This archive contains the distribution IO-Socket-CLI,
version 0.041:

  CLI for IO::Socket::INET6 and IO::Socket::SSL

This software is copyright (c) 2014 by Ashley Willis.

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


This README file was generated by Dist::Zilla::Plugin::Readme v5.020.

lib/IO/Socket/CLI.pm  view on Meta::CPAN

package IO::Socket::CLI;
$IO::Socket::CLI::VERSION = '0.041';
use 5.006;
use strict;
use warnings;
use IO::Socket::SSL;
use IO::Socket::INET6;
use Carp;

# defaults
my $DEBUG = 0;			# boolean?
my $DELAY = 10;			# number of milliseconds between each attempt at reading the response from the server.
my $TIMEOUT = 5;		# number of seconds to wait for a response from server before returning an empty list.
my $PRINT_RESPONSE = 1;		# boolean
my $PREPEND = 1;		# boolean
our $SSL = 0;			# boolean

lib/IO/Socket/CLI.pm  view on Meta::CPAN

    $self->{_TIMEOUT} = ($args->{TIMEOUT}) ? $args->{TIMEOUT} : $TIMEOUT;
    $self->{_PRINT_RESPONSE} = (defined $args->{PRINT_RESPONSE}) ? $args->{PRINT_RESPONSE} : $PRINT_RESPONSE;
    $self->{_PREPEND} = (defined $args->{PREPEND}) ? $args->{PREPEND} : $PREPEND;
    $self->{_DEBUG} = (defined $args->{DEBUG}) ? $args->{DEBUG} : $DEBUG;
    $self->{_SSL} = (defined $args->{SSL}) ? $args->{SSL} : $SSL;
    $self->{_SOCKET} = IO::Socket::INET6->new(PeerAddr => $self->{_HOST},
                                              PeerPort => $self->{_PORT},
                                              Blocking => 0) ||
            die "Can't bind : $@\n";

    ($self->{_SSL}) and IO::Socket::SSL->start_SSL($self->{_SOCKET});
    $self->{_OPEN} = ($self->{_SOCKET}->connected()) ? 1 : 0;
    $self->{_COMMAND} = '';
    $self->{_SERVER_RESPONSE} = [];

    bless ($self, $class);
    return $self;
}

sub read {
    my $self = shift;

lib/IO/Socket/CLI.pm  view on Meta::CPAN

        print STDOUT "class destroyed.\n";
    }
}

1;

__END__

=head1 NAME

IO::Socket::CLI - CLI for IO::Socket::INET6 and IO::Socket::SSL

=head1 VERSION

version 0.041

=head1 SYNOPSIS

  use IO::Socket::CLI;
  our @ISA = ("IO::Socket::CLI");

=head1 DESCRIPTION

C<IO::Socket::CLI> provides a command-line interface to L<IO::Socket::INET6> and
L<IO::Socket::SSL>.

=for comment
=head1 EXPORT
None by default.

=head1 METHODS

=over 2

=item new(...)

lib/IO/Socket/CLI.pm  view on Meta::CPAN

This library is free software; you can redistribute it and/or modify
it under the same terms as Perl itself, either Perl version 5.12.4 or,
at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

L<IO::Socket::INET6>

L<IO::Socket::INET>

L<IO::Socket::SSL>

L<IO::Socket>

lib/IO/Socket/CLI/IMAP.pm  view on Meta::CPAN

 my $imap = IO::Socket::CLI::IMAP->new(HOST => '::1');
 $imap->read();
 do {
     $imap->prompt();
     $imap->read();
 } while ($imap->is_open());

=head1 DESCRIPTION

C<IO::Socket::CLI::IMAP> provides a command-line interface to
L<IO::Socket::INET6> and L<IO::Socket::SSL>.

=for comment
=head1 EXPORT
None by default.

=head1 METHODS

See C<IO::Socket::CLI>.

=head1 BUGS

lib/IO/Socket/CLI/IMAP.pm  view on Meta::CPAN

at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

L<IO::Socket::CLI>

L<IO::Socket::INET6>

L<IO::Socket::INET>

L<IO::Socket::SSL>

L<IO::Socket>

lib/IO/Socket/CLI/IMAPS.pm  view on Meta::CPAN

 my $imap = IO::Socket::CLI::IMAPS->new(HOST => '192.168.1.3');
 $imap->read();
 do {
     $imap->prompt();
     $imap->read();
 } while ($imap->is_open());

=head1 DESCRIPTION

C<IO::Socket::CLI::IMAPS> provides a command-line interface to
L<IO::Socket::INET6> and L<IO::Socket::SSL>.

=for comment
=head1 EXPORT
None by default.

=head1 METHODS

See C<IO::Socket::CLI>.

=head1 BUGS

lib/IO/Socket/CLI/IMAPS.pm  view on Meta::CPAN

at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

L<IO::Socket::CLI>

L<IO::Socket::INET6>

L<IO::Socket::INET>

L<IO::Socket::SSL>

L<IO::Socket>

lib/IO/Socket/CLI/POP3.pm  view on Meta::CPAN

 my $pop3 = IO::Socket::CLI::POP3->new(HOST => 'pop.mail.yahoo.com');
 $pop3->read();
 do {
     $pop3->prompt();
     $pop3->read();
 } while ($pop3->is_open());

=head1 DESCRIPTION

C<IO::Socket::CLI::POP3> provides a command-line interface to
L<IO::Socket::INET6> and L<IO::Socket::SSL>.

=for comment
=head1 EXPORT
None by default.

=head1 METHODS

See C<IO::Socket::CLI>.

=head2 is_open()

lib/IO/Socket/CLI/POP3.pm  view on Meta::CPAN

at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

L<IO::Socket::CLI>

L<IO::Socket::INET6>

L<IO::Socket::INET>

L<IO::Socket::SSL>

L<IO::Socket>

lib/IO/Socket/CLI/POP3S.pm  view on Meta::CPAN

 my $pop3 = IO::Socket::CLI::POP3S->new(HOST => 'pop.gmail.com');
 $pop3->read();
 do {
     $pop3->prompt();
     $pop3->read();
 } while ($pop3->is_open());

=head1 DESCRIPTION

C<IO::Socket::CLI::POP3S> provides a command-line interface to
L<IO::Socket::INET6> and L<IO::Socket::SSL>.

=for comment
=head1 EXPORT
None by default.

=head1 METHODS

See C<IO::Socket::CLI>.

=head2 is_open()

lib/IO/Socket/CLI/POP3S.pm  view on Meta::CPAN

at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

L<IO::Socket::CLI>

L<IO::Socket::INET6>

L<IO::Socket::INET>

L<IO::Socket::SSL>

L<IO::Socket>

lib/IO/Socket/CLI/SMTP.pm  view on Meta::CPAN

 my $smtp = IO::Socket::CLI::SMTP->new(HOST => '192.168.1.3');
 $smtp->read();
 do {
     $smtp->prompt();
     $smtp->read();
 } while ($smtp->is_open());

=head1 DESCRIPTION

C<IO::Socket::CLI::SMTP> provides a command-line interface to
L<IO::Socket::INET6> and L<IO::Socket::SSL>.

=for comment
=head1 EXPORT
None by default.

=head1 METHODS

See C<IO::Socket::CLI>.

=head1 BUGS

lib/IO/Socket/CLI/SMTP.pm  view on Meta::CPAN

at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

L<IO::Socket::CLI>

L<IO::Socket::INET6>

L<IO::Socket::INET>

L<IO::Socket::SSL>

L<IO::Socket>

lib/IO/Socket/CLI/SMTPS.pm  view on Meta::CPAN

 my $smtp = IO::Socket::CLI::SMTPS->new(HOST => 'smtp.gmail.com');
 $smtp->read();
 do {
     $smtp->prompt();
     $smtp->read();
 } while ($smtp->is_open());

=head1 DESCRIPTION

C<IO::Socket::CLI::SMTPS> provides a command-line interface to
L<IO::Socket::INET6> and L<IO::Socket::SSL>.

=for comment
=head1 EXPORT
None by default.

=head1 METHODS

See C<IO::Socket::CLI>.

=head1 BUGS

lib/IO/Socket/CLI/SMTPS.pm  view on Meta::CPAN

at your option, any later version of Perl 5 you may have available.

=head1 SEE ALSO

L<IO::Socket::CLI>

L<IO::Socket::INET6>

L<IO::Socket::INET>

L<IO::Socket::SSL>

L<IO::Socket>



( run in 0.731 second using v1.01-cache-2.11-cpan-fd5d4e115d8 )