Ly dang tu hoc Perl (scripting language) va hien gio Ly dang gap kho khan trong viec su dung Hash va Array trong program cua minh. Ly can cac ban chi bao gium. Xin cam on!
Tran Ngoc Ly
Hồi âm:
1. Khai báo array trong Perl dùng dấu @ đứng trước tên biến:
@my_array = (1, '2.34', "linhtinh");
Các item có thể khác nhau về Data type. Để tham chiếu một phần tử của array, dùng index nhý trong JAVA, C++..., nhýng thay dấu @ bằng dấu $. Chẳng hạn, lệnh :
print "Phan tu so 3 la cai gi ? $items[2]\n";
Sẽ hiển thị :
Phan tu so 3 la cai gi ?"linhtinh".
2. Khai báo và sử dụng Hash trong Perl phức tạp hơn, đặc biệt khi muốn communicate với JAVA. Khởi tạo 1 hash hay clear nó :
my %hash = ();
Truy nhập các element :
foreach my $key ( keys %HASH ) {
my $value = $HASH{$key};
print "$key => $value\n";
}
Bạn cũng có thể dùng function tạo hash of hashes.
Trần Bình
Ly men! Anh viet mot doan code ngan nay de giai dap thac mac ma em dang can de tham khao nha: use Benchmark; my @array = qw(a b c d e f g h i j k l m n o p q r s t u v w z y z);
my %hash; timethese(500000, {
'Phucusa' => sub {
@hash{@array} = (1) x @array;
},
'httptech' => sub {
for (@array) { $hash{$_} = 1 }
},
});
Chuc em vui ve!
Phucusa