Help for this page

Select Code to Download


  1. or download this
      DB<131> $conf3 = { db => { %{$conf1->{db}}, %{$conf2->{db}} } } 
    => 
    ...
            },
    }
    
  2. or download this
      DB<132> $conf3 = { map { $_ => { %{$conf1->{$_}}, %{$conf2->{$_}} } 
    +} keys %{{ %$conf1,  %$conf2 }} }
     => 
    ...
              user     => "pdte_usr",
            },
    }
    
  3. or download this
      DB<142> sub merge_hr {  return  { %{$_[0]}, %{$_[1]} } } 
    
    ...
              user     => "pdte_usr",
            },
    }