#assume $m1 and $m2 are matrix objects

 my $m3 = $m1->ApplyFunction(\&mysub, $m2);

 ....
 sub mysub{
   my ($element1,$element2)=@_;
   return $element1 &#$((Some operation) $element2;
 }