Как правильно проверить, является ли строка пустой в Perl?

Question

Как правильно проверить, является ли строка пустой в Perl?

69

Я только что использовал этот код, чтобы проверить, является ли строка пустой:

if ($str == "")
{
  // ...
}

А также то же самое с оператором not equals...

if ($str != "")
{
  // ...
}

Кажется, это работает (я думаю), но я не уверен, что это правильный путь, или если есть какие-то непредвиденные недостатки. Что-то просто не чувствует себя хорошо.

Nick Bolton 11 янв. 2010, в 22:46

Источник

Теги:

string

perl

comparison

6 ответов

77

Из-за того, что строки хранятся в Perl, оптимизация длины строки. if (length $str) - хороший способ проверить, что строка не пуста.
Если вы находитесь в ситуации, когда вы еще не защитили от undef, то все-таки для "непустого", который не будет предупреждать, будет if (defined $str and length $str).

hobbs 12 янв. 2010, в 00:10

5

Я думаю, что длина является самым близким тестом, который мы имеем к выражению идеи, что в строке ничего нет.
brian d foy 12 янв. 2010, в 11:23
5

Проголосовал, потому что if (length($str)) - хороший подход и не завершится ошибкой, если переменная не определена.
basic6 19 май 2015, в 09:32

9

Как уже упоминалось несколькими людьми, eq - это правильный оператор.

Если вы use warnings; в своем script, вы получите предупреждения об этом (и многие другие полезные вещи); Я бы рекомендовал use strict;.

Matthew Slattery 12 янв. 2010, в 00:54

0

+1 Круто, да я обычно использую use strict но я обновляю старый код, поэтому, когда я добавляю это, я получаю сотни ошибок. Я, вероятно, исправлю их когда-нибудь.
Nick Bolton 11 янв. 2010, в 23:37

8

Возможно, вы захотите использовать "eq" вместо "==". Если вы беспокоитесь о некоторых случаях с краем, вы также можете проверить undefined:

if (not defined $str) {

# this variable is undefined

}

DmitryK 12 янв. 2010, в 01:10

1

Очень полезно, когда вы получили строку путем смещения массива, который может иметь 0 элементов.
Dacav 13 нояб. 2011, в 12:45

2

Сама концепция "правильного" способа сделать что-либо, кроме использования CPAN, не существует в Perl.

В любом случае это числовые операторы, вы должны использовать

if($foo eq "")

или

if(length($foo) == 0)

whatsisname 11 янв. 2010, в 23:35

3

Это правда, что Perl не склонен отстаивать «единственно верный путь» к решению проблем, но это не значит, что не существует особо предпочтительных идиом, стилей и подходов. Кроме того, как один из постоянных клиентов Perl любит много говорить, даже если есть несколько способов сделать что-то, некоторые способы сделать что-то действительно, очень плохо (глупо, опрометчиво, трудно поддерживать и т. Д. .)
Telemachus 12 янв. 2010, в 02:05
2

То, что есть много способов сделать это, не означает, что все способы равны. Например, проверка на наличие пустых строк с использованием if ($foo == "") категорически неверна, если только вы на самом деле не хотите проверять, имеет ли значение $foo , вычисляемое в числовом контексте, значение 0 (в этом случае оно все равно будет лучше писать так, как if ($foo == 0) , так как это более ясно выражает ваше намерение).
Dave Sherohman 12 янв. 2010, в 10:31

0

Чтобы проверить пустую строку, вы также можете сделать что-то следующим образом

if (!defined $val || $val eq '')
{
    # empty
}

Roland Ayala 06 нояб. 2017, в 04:24

Ещё вопросы

Я думаю, что длина является самым близким тестом, который мы имеем к выражению идеи, что в строке ничего нет.
Проголосовал, потому что if (length($str)) - хороший подход и не завершится ошибкой, если переменная не определена.
+1 Круто, да я обычно использую use strict но я обновляю старый код, поэтому, когда я добавляю это, я получаю сотни ошибок. Я, вероятно, исправлю их когда-нибудь.
Очень полезно, когда вы получили строку путем смещения массива, который может иметь 0 элементов.
Это правда, что Perl не склонен отстаивать «единственно верный путь» к решению проблем, но это не значит, что не существует особо предпочтительных идиом, стилей и подходов. Кроме того, как один из постоянных клиентов Perl любит много говорить, даже если есть несколько способов сделать что-то, некоторые способы сделать что-то действительно, очень плохо (глупо, опрометчиво, трудно поддерживать и т. Д. .)
То, что есть много способов сделать это, не означает, что все способы равны. Например, проверка на наличие пустых строк с использованием if ($foo == "") категорически неверна, если только вы на самом деле не хотите проверять, имеет ли значение $foo , вычисляемое в числовом контексте, значение 0 (в этом случае оно все равно будет лучше писать так, как if ($foo == 0) , так как это более ясно выражает ваше намерение).

Greg Hewgill · Accepted Answer · 2010-01-12T00-33-00.000Z

Для сравнения строк в Perl используйте eq или ne:

if ($str eq "")
{
  // ...
}

Операторы == и != являются числовыми операторами сравнения. Они попытаются преобразовать оба операнда в целые числа, прежде чем сравнивать их.

Для получения дополнительной информации см. справочную страницу perlop.

Да, используя это, вы должны быть осторожны, если оно не определено, и если вы используете предупреждения, вы получите предупреждение во время выполнения. Много способов обойти предупреждение, хотя.