Nó có hợp lệ không và nó có hoạt động không? Nếu bạn thu thập hoặc sử dụng địa chỉ email ở bất kỳ đâu trong kịch bản và chương trình Perl của mình, bạn có thể thu thập nhiều địa chỉ không hoạt động. Người ta có thể thiếu một lá thư trong tên miền , người khác có thể có một nhân vật không được phép quá nhiều.
Dù lý do cho sự vô hiệu của nó là gì, bạn cũng muốn nắm bắt được địa chỉ bị hỏng - để nhắc người dùng nhập lại có thể, hoặc để tránh gửi một email chắc chắn không đi đến đâu cả.
Trong Perl, bạn có thể pha trộn một biểu thức chính quy phức tạp, tất nhiên; hoặc bạn chuyển sang một mô-đun tiện dụng đã có sẵn và cũng có thể kiểm tra tên miền.
Xác nhận địa chỉ email với Perl
Để kiểm tra địa chỉ email cho tính đúng đắn và tính hợp lệ trong một tập lệnh hoặc chương trình Perl:
- Xây dựng xác thực email vào mã HTML nếu bạn có người dùng nhập địa chỉ email vào biểu mẫu web.
- Sử dụng Email :: Valid-> address ('') từ Email :: Module CPAN Perl hợp lệ; xem bên dưới để biết chi tiết, cài đặt và ví dụ.
Email :: Ví dụ về xác thực địa chỉ email hợp lệ
Giả sử $ email_address giữ địa chỉ cần kiểm tra, bạn có thể kiểm tra tính hợp lệ của địa chỉ bằng cách sử dụng:
#! / usr / bin / perl sử dụng Email :: Hợp lệ $ email_address = 'me @@ example.com'; if (Email :: Valid-> address ($ email_address)) {# Địa chỉ email hợp lệ} else {# Địa chỉ email không hợp lệ}Bạn cũng có thể có Email :: Kiểm tra hợp lệ cho các tên miền cấp cao hợp lệ (đảm bảo ".com", ".net", ".cn" hoặc tên miền hợp lệ khác ở cuối địa chỉ email). Đảm bảo đã cài đặt mô-đun Net :: Domain :: TLD.
#! / usr / bin / perl sử dụng Email :: Hợp lệ $ email_address = 'me @@ example.com'; if (Email :: Valid-> address (-address => $ email_address, -tldcheck => 1)) {# Địa chỉ email hợp lệ} else {# Địa chỉ email không hợp lệ}Cài đặt Email :: Mô-đun Perl hợp lệ
Để trang bị cho cài đặt Perl của bạn với mô-đun Email :: Valid để xác thực tính chính xác của địa chỉ email:
- Mở dấu nhắc lệnh.
- Trong Mac và Linux, ví dụ, mở ứng dụng Terminal.
- Nhập sudo perl -MCPAN -e 'cài đặt Email :: Hợp lệ' (Mac và Linux) hoặc perl -MCPAN -e 'cài đặt Email :: Hợp lệ'.
- Nhấn Enter .
- Nhập mật khẩu người dùng siêu và nhấn Enter nếu được nhắc.
- Khi được hỏi Bạn có muốn tôi định cấu hình tự động nhất có thể không? , chọn "có" trừ khi bạn biết
- Đã hỏi Có OK để thử kết nối Internet không? , nhập "có" là tốt.