=cut
sub new {
- my( $class, @rest ) = @_;
+ my ( $class, @rest ) = @_;
return $class->SUPER::new(
agent => join( '/', __PACKAGE__, $WWW::OpenSearch::VERSION ),
@rest,
sub request {
my $self = shift;
- my $request = shift; ;
+ my $request = shift;
my $response = $self->SUPER::request( $request, @_ );
# allow regular HTTP::Requests to flow through