package MyParseWhois;
require 5.004;
use strict;

use Carp;
use vars qw/@ISA/;

@ISA = ("Net::ParseWhois");

sub _connect {

# My proxy connect code here....

}

1;