cuốn sách gpt4 ai đã làm

16. Trích dẫn Perl

In lại Tác giả: Đường đến ông chủ Thời gian cập nhật: 21/01/2024 22:45:48 30 4
mua khóa gpt4 Nike

Tham chiếu trong Perl đề cập đến một kiểu vô hướng có thể trỏ đến một biến, mảng, bảng băm (còn được gọi là mảng kết hợp) hoặc thậm chí là một hàm và có thể được áp dụng ở bất kỳ đâu trong chương trình.

Tạo tài liệu tham khảo

Khi xác định một biến, hãy thêm \ vào trước tên biến để lấy tham chiếu đến biến.

$scalarref = \$foo; # Tham chiếu biến vô hướng $arrayref = \@ARGV; # Tham chiếu danh sách $hashref = \%ENV; # Tham chiếu hàm băm $coderef = \&handler; # Tham chiếu hàm $globref = \*foo; thẩm quyền giải quyết

Sử dụng [] để xác định tham chiếu đến một mảng ẩn danh:

$aref= [ 1,"foo",undef,13 ];

Các phần tử của mảng ẩn danh vẫn có thể là mảng ẩn danh. Chúng ta có thể sử dụng phương pháp này để xây dựng một mảng các mảng và chúng ta có thể xây dựng một mảng có kích thước bất kỳ.

$aref của tôi = [ [1, 2, 3], [4, 5, 6], [7, 8, 9], ]

Sử dụng {} để xác định tham chiếu băm ẩn danh:

$href= { APR =>4, AUG =>8 };

Thậm chí có thể định nghĩa một hàm ẩn danh (tham chiếu đến hàm ẩn danh):

$coderef = sub { print "Chào mừng đến với www.ddkk.com!\n" };

sự vô lễ

Để lấy giá trị được lưu trữ ban đầu từ biến được tham chiếu, bạn có thể sử dụng nó theo các kiểu dữ liệu khác nhau. $ ký hiệu , @ hoặc %

#!/usr/bin/perl =pod file: mail.pl tác giả: DDKK.COM Nhìn này em trai, Trạm thông tin lập trình lập trình viên (www.ddkk.com) Bản quyền © 2015-2065 www.ddkk.com. . =cut $var = 10; # $r tham chiếu đến $var vô hướng $r = \$var; # Xuất ra giá trị biến của $r được lưu trữ cục bộ print "$var is: ", $$r, "\n"; @var = (1, 2, 3); # $r tham chiếu đến mảng @var $r = \@var; # Xuất ra giá trị biến của $r được lưu trữ cục bộ print "@var là: ", @$r, "\n"; %var = ('key1' => 10, 'key2' => 20); # $r đề cập đến mảng %var $r = \%var; # Xuất ra giá trị biến của $r được lưu trữ cục bộ print "%var is: ", %$r, "\n";

Kết quả thực hiện ví dụ trên là:

$ perl main.pl 10 là: 10 1 2 3 là: 123 %var là: key110key220

Nếu chúng ta không chắc chắn về loại biến đang được tham chiếu, chúng ta có thể sử dụng giới thiệu Để đánh giá danh sách giá trị trả về như sau, nếu không có giá trị sau thì trả về false

MÃ BẰNG SCALAR MÃ Băm GLOB REF

Ví dụ: Sử dụng giới thiệu Xác định loại biến được tham chiếu

#!/usr/bin/perl =pod file: mail.pl tác giả: DDKK.COM Nhìn này em trai, Trạm thông tin lập trình lập trình viên (www.ddkk.com) Bản quyền © 2015-2065 www.ddkk.com. . =cut $var = 10; $r = \$var; print "Loại tham chiếu của r: ", ref($r), "\n"; 3); $r = \@var; print "Loại tham chiếu của r: ", ref($r), "\n"; %var = ('key1' => 10, 'key2' => 20); r = \%var; print "Loại tham chiếu của r: ", ref($r), "\n";

Chạy ví dụ trên, kết quả đầu ra như sau:

$ Perl main.pl Kiểu tham chiếu của r: SCALAR Kiểu tham chiếu của r: ARRAY Kiểu tham chiếu của r: HASH

tham chiếu vòng tròn

Tham chiếu vòng xảy ra khi hai tham chiếu chứa nhau.

Chúng ta phải sử dụng cẩn thận, nếu không sẽ gây rò rỉ bộ nhớ

#!/usr/bin/perl =pod file: mail.pl tác giả: DDKK.COM Nhìn này em trai, Trạm thông tin lập trình lập trình viên (www.ddkk.com) Bản quyền © 2015-2065 www.ddkk.com. . =cut $foo = 100 của tôi; print "Giá trị của foo là : ", $$foo, "\n";

Kết quả thực hiện ví dụ trên là:

$ perl main.pl Giá trị của foo là: REF(0x7fc50a008bc8)

hàm tham chiếu

Có thể tạo một tham chiếu đến một hàm trong Perl

Định dạng tham chiếu hàm là: &

Định dạng hàm tham chiếu gọi: & + tên tham chiếu đã tạo

#!/usr/bin/perl =pod file: mail.pl tác giả: DDKK.COM Nhìn này em trai, Trạm thông tin lập trình lập trình viên (www.ddkk.com) Bản quyền © 2015-2065 www.ddkk.com. . =cut # Định nghĩa hàm phụ PrintHash{ my (%hash) = @_; foreach $item (%hash){ print "Element: $item\n"; %hash = ('name' => 'DDKK.COM, trang thông tin lập trình của lập trình viên', 'age' => 3); # Tạo tham chiếu đến hàm $cref = \&PrintHash; $ cref(%hash);

Chạy ví dụ trên, kết quả đầu ra như sau:

$ perl main.pl Element: age Element: 3 Element: name Element: DDKK.COM Nhìn đi anh em, trang thông tin lập trình dành cho lập trình viên

30 4 0
Bài viết khuyến nghị: 06. Biến Perl
Bài viết khuyến nghị: 21. Biến đặc biệt Perl
Bài viết khuyến nghị: 13. Toán tử Perl
Bài viết khuyến nghị: 24. Lập trình ổ cắm Perl
Chứng chỉ ICP Bắc Kinh số 000000
Hợp tác quảng cáo: 1813099741@qq.com 6ren.com
Xem sitemap của VNExpress