if ( $text =~ m/cow\s+(\w+)\s+over/ ) {
    do_action( $1 );
    $1 = calculate_new_action( $1 );
  }