sub replacement { my $this = shift; my ( $cb, $key, $first, $second ) = @_; return $cb->( $key, $this->mask_block_params( $first, $second ) ); }