#$obj->thing( 15000, 20000 ) =~ s[something][else]g;
{
  my $tmp=$obj->thing();
  $tmp =~ s[something][else]g;
  $obj->thing(15000,20000,$tmp);
}