File Coverage

blib/lib/Comskil/JQueue/POP.pm

Criterion	Covered	Total	%
statement	7	9	77.7
branch			n/a
condition			n/a
subroutine	3	3	100.0
pod			n/a
total	10	12	83.3

# #TODO Inherit from the JQueue class.
# #TODO Add in Perl documentation:  Full Documentation.
# #TODO Create a test program for this package.




package Comskil::JQueue::POP;

use strict;
use warnings;


use Net::POP3_auth;

use Comskil::JServer;
use Comskil::JQueue;

BEGIN {
    use Exporter();

	our ($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS);

    $VERSION = '0.10';
    @ISA = qw( Exporter Comskil::JQueue );
    @EXPORT	= qw( );
    @EXPORT_OK = qw( try );
    %EXPORT_TAGS = ( ALL => [ qw( try ) ] );
}

END { }

sub new {
	my ($type,@args) = @_;
	my $self = Comskil::JQueue->new();
	bless($self,$type);

	return($self);
}


sub try {
	my ($self,@args) = @_;
	return($self);
}


1;
__END__