package MyMech;
use base qw(WWW::Mechanize);

sub new {
	my $class = shift or die $!;
	my $self  = $class->SUPER::new;
	return bless $self, $class;
}

sub get {
	my $self = shift;
	$self->SUPER::get(@_);
}