zhu894532094 发表于 2015-12-27 17:57:21

PERL代码摘录

#嵌套哈希的赋值和取值  $HashTable{$key} = [@Array]         #这个是赋值
  @Array = @{ $HashTable{$key} }   # 这个是取值
  #Perl 按照哈希值排序
  #如果是按ASCII码(字符串)排序,则代码如下:
  foreach my $key ( sort { $hash{$a} cmp $hash{$b} } keys %hash ) {
  my $value = $hash{$key};
  # do something with ($key, $value)4 }
  #如果是按数字大小排列,则代码如下:
  foreach my $key ( sort { $hash{$a}$hash{$b} } keys %hash ) {
  my $value = $hash{$key};
  # do something
页: [1]
查看完整版本: PERL代码摘录