小编use*_*951的帖子

我有Perl代码:

my $s =  "The+quick+brown+fox+jumps+over+the+lazy+dog+that+is+my+dog";

我希望每一个来代替+空间和dog使用cat.

我有这个正则表达式:

$s =~ s/\+(.*)dog/ ${1}cat/g;

但是,它只匹配第一次出现+和最后出现dog.

现在我有一个 BaseObject 可以对 DB 执行 ORM。我依靠私有 $data 和魔法 setter 和 getter 来创建带有一堆列的对象作为私有对象成员（动态）。在子类中，如果我想更改行为以设置单个对象成员，我必须覆盖父 setter 并查找键。我的问题是是否有更好的方法来做到这一点，我可以只覆盖单个对象成员而不是通过 __setter

映射到数据库并动态创建一堆私有参数的基本对象映射器

class Base
 {
    private $data = array();

    public function __construct(){
        //get columns info from db and do set
    }
    public function __set($key, $value){
        $this->data[$key] = $value;        
    }

   public function __get($key){
       return isset($this->data[$key])? $this->data[$key] : null;       
   }
}

和儿童班。现在要覆盖参数设置我必须这样做

 class Child extends Base
 {
     public function __set($name, $value){
        if($name == 'dog' && $value == 'chihuahua')
          $this->dog = 'dog bark wolf wolf';
        else if($name == 'cat' …