SOAP-Transport-MQ
view release on metacpan - search on metacpan
view release on metacpan or search on metacpan
lib/SOAP/Transport/MQ.pm view on Meta::CPAN
my $class = shift;
return $class if ref $class;
my ( @params, @methods );
while (@_) {
$class->can( $_[0] )
? push( @methods, shift() => shift )
: push( @params, shift );
}
my $self = bless {@params} => $class;
while (@methods) {
my ( $method, $params ) = splice( @methods, 0, 2 );
$self->$method( ref $params eq 'ARRAY' ? @$params : $params );
}
SOAP::Trace::objects('()');
return $self;
}
sub endpoint {
view all matches for this distributionview release on metacpan - search on metacpan
( run in 1.386 second using v1.00-cache-2.02-grep-82fe00e-cpan-2c419f77a38b )