Viewing File: /usr/local/cpanel/3rdparty/perl/536/cpanel-lib/Net/WebSocket/X/MissingHeaders.pm

package Net::WebSocket::X::MissingHeaders;

use strict;
use warnings;

use parent qw( Net::WebSocket::X::Base );

sub _new {
    my ($class, @names) = @_;

    return $class->SUPER::_new(
        sprintf("Missing header(s): @names"),
        names => \@names,
    );
}

1;