Even better than that, if you create a new infix operator: sub infix:<OP> ( $a, $b ) {…} You get `OP=` for free: $x OP= $y; # $x = $x OP $y That is

Even better than that, if you create a new infix operator: sub infix:<OP> ( $a, $b ) {…} You get `OP=` for free: $x OP= $y; # $x = $x OP $y That is because `=` is actually a meta operator. (It takes an infix operator as a sort-of argument.) $x [OP]= $y; # more explicit that `OP` is an argument to `=` --- You could also just use a regular subroutine as if it was an infix operator: sub foo ( $a, $b ) {…} $x [&foo] $y; # foo( $x, $y ) So you can also use it with the `=` meta operator: $x [&foo]= $y; # $x = foo( $x, $y )