Viewing File: /usr/local/cpanel/3rdparty/perl/536/cpanel-lib/IO/Framed/ReadWrite/NonBlocking.pm

package IO::Framed::ReadWrite::NonBlocking;

use strict;
use warnings;

use parent qw(
    IO::Framed::ReadWrite
    IO::Framed::Write::NonBlocking
);

sub new {
    $_[0]->SUPER::new( @_[ 1 .. $#_ ] )->enable_write_queue();
}

1;