use strict;
use warnings;

package My::UserAgent;

BEGIN { our @ISA = 'LWP::UserAgent'; }

use LWP::UserAgent  qw( );
use URI             qw( );
use URI::QueryParam qw( );

sub request
{
    my $self    = shift;
    my $request = shift;

    my $uri = URI->new( $request->uri() );
    $uri->query_param_delete( 'jsessionid' );
    $request->uri( $uri );

    return $self->SUPER::request( $request, @_ );
}

1;