Как я чисто извлекаю значения перечисления MySQL в Perl?

Question

Как я чисто извлекаю значения перечисления MySQL в Perl?

То, что вы описываете, это MasterDetail

Xamarin.Forms MasterDetailPage - это страница, которая управляет двумя связанными страницами информации - главной страницей, которая представляет элементы, и страница сведений, которая представляет сведения об элементах на главной странице.
blockquote>

6

dbix-class enums perl mysql

задан swilliams 23 October 2008 в 12:43

2 ответа

Я сказал бы использование текста:: CSV_XS может быть излишеством, если у Вас нет странных вещей как запятые в перечислениях (плохая идея так или иначе, если Вы спрашиваете меня). Я, вероятно, использовал бы это вместо этого.

my @fields = $type =~ / ' ([^']+) ' (?:,|\z) /msgx;

Кроме этого, я не думаю, что существуют ярлыки.

3

ответ дан 8 December 2019 в 14:49

Другие вопросы по тегам:

dbix-class enums perl mysql

Похожие вопросы:

score 13 · Accepted Answer

Никакая потребность быть настолько героическим. Используя довольно современную версию DBD:: mysql, хеш, возвращенный методом информации о столбце DBI, содержит версию перед разделением допустимых перечислимых значений в ключе mysql_values:

my $sth = $dbh->column_info(undef, undef, 'mytable', '%');

foreach my $col_info ($sth->fetchrow_hashref)
{
  if($col_info->{'TYPE_NAME'} eq 'ENUM')
  {
    # The mysql_values key contains a reference to an array of valid enum values
    print "Valid enum values for $col_info->{'COLUMN_NAME'}: ", 
          join(', ', @{$col_info->{'mysql_values'}}), "\n";
  }
  ...
}