Cách thích hợp để kiểm tra xem một chuỗi trống trong Perl là gì?

Tôi vừa sử dụng mã này để kiểm tra xem một chuỗi có trống không:

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

Và cũng tương tự với toán tử not = ...

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

Điều này có vẻ hiệu quả (tôi nghĩ vậy), nhưng tôi không chắc đó là cách chính xác, hoặc nếu có bất kỳ nhược điểm nào không lường trước được. Có điều gì đó không ổn về nó.

Để so sánh chuỗi trong Perl, hãy sử dụng eqhoặc ne:

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

Các ==và !=khai thác được số toán tử so sánh. Họ sẽ cố gắng chuyển đổi cả hai toán hạng thành số nguyên trước khi so sánh chúng.

Xem trang người đàn ông perlop để biết thêm thông tin.

1. Do cách mà các chuỗi được lưu trữ trong Perl, việc tối ưu hóa độ dài của một chuỗi.
   if (length $str)là một cách tốt để kiểm tra xem một chuỗi có trống không.

2. Nếu bạn đang ở trong một tình huống mà bạn chưa đề phòng undef, thì giải pháp bắt tất cả cho "không trống" sẽ không cảnh báo là if (defined $str and length $str).

Bạn có thể muốn sử dụng "eq" thay vì "==". Nếu bạn lo lắng về một số trường hợp cạnh, bạn cũng có thể muốn kiểm tra xem chưa xác định:

if (not defined $str) {

# this variable is undefined

}

Như đã được đề cập bởi một số người, eqlà nhà điều hành phù hợp ở đây.

Nếu bạn use warnings;ở trong tập lệnh của mình, bạn sẽ nhận được cảnh báo về điều này (và nhiều điều hữu ích khác); Tôi cũng muốn giới thiệu use strict;.

Khái niệm về một cách "thích hợp" để làm bất cứ điều gì, ngoài việc sử dụng CPAN, không tồn tại ở Perl.

Dù sao thì đó cũng là toán tử số, bạn nên sử dụng

if($foo eq "")

hoặc là

if(length($foo) == 0)

Để kiểm tra một chuỗi trống, bạn cũng có thể làm như sau

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