sub create_index {
   my ($dbh, $index_name, $frontend, $backend, $scoring) = @_;

   . . .
}

. . .

my $index = create_index($dbh, 'search_index', 'string', 'phrase', 1);