Come sovrascrivere una funzione utilizzata in un metodo modulo?

Question

#!/usr/bin/env perl 
use warnings; 
use 5.012; 
use utf8; 

use WWW::Mechanize::Cached; 
use Some::Module qw(some_method); 

my $url = '...'; 
my $result = some_method($url); 

Il some_method() utilizza se stesso get() modulo LWP::Simple.
Come posso sovrascrivere lo get() con il mio my_get() in questo script?

sub my_get { 
    my $url; 
    my $mech = WWW::Mechanize::Cached->new(); 
    $mech->get($url); 
    my $content = $mech->content(format => 'text'); 
    return $content; 
} 

Answer 1

sub WWW::Mechanize::Cached::get { 
    # your code 
} 

O, se il metodo get è in realtà, come si implica nella questione, è ereditato da LWP :: Simple -

sub LWP::Simple::get { 
    # your code 
}