perl哈希（perl中怎样把正则表达式匹配的内容存入哈希）

：暂无数据 2026-04-25 11:00:01 ：0

本篇内容旨在成为您理解perl哈希的实用手册，其中perl中怎样把正则表达式匹配的内容存入哈希将是我们要重点打磨的章节。

本文目录

perl中怎样把正则表达式匹配的内容存入哈希
perl 如何把hash 按照数值大小排序
perl，一个简单的哈希
[perl] perl 中二维哈希hash 与python 二维字典dict
perl 哈希keys是按顺序排的吗
Perl哈希怎样实现输出的顺序还是按照文件里的顺序

perl中怎样把正则表达式匹配的内容存入哈希

$values= 《OUTFILE》这样这个变量只读取了一行啊，$/ 中保存这输入行记录分隔符(它的默认分隔符是\n)。因此，每当菱形运算符用于读取数据时，它将一直读取数据，直到它发现与$/一致的字符。所以，如果我们将$/设为 undef ，菱形运算符将读取整个文件并将它们存储在标量中。要想让perl“吞吃文件”，可以改成这样: use strict; my $values ; open(OUTFILE,"*****") or die("Can’t find *****:$!") ; $/ = undef; # 此行注掉后，$values 仅读入Logon Failure: while(defined($values= 《OUTFILE》)){ # print $values ; if($values =~ /.*User Name:(.*);(.*)/ms){ print $1; print $2; }}

perl 如何把hash 按照数值大小排序

按哈希键的数值大小排序：
my @key =sort {$a 《=》 $b} keys %hash;
@key里头存的是按哈希键的数值大小排序后的键。
按哈希值的数值大小排序：
my @key =sort {$hash{$a} 《=》 $hash{$b}} keys %hash;
@key里头存的是按哈希值的数值大小排序后的键

perl，一个简单的哈希

如果我这么写：print "$count{ "fred" }"; （在哈希前后加上双引号）程序就会报错：
Unquoted string "fred" may clash with future reserved word at ./***** line 762.
String found where operator expected at ./***** line 762, near "fred" }""
syntax error at ./***** line 762, at EOF
Execution of ./***** aborted due to compilation errors.
这是为什么啊？
那是因为你的“”里面还有“”，而perl会把第二个“和前面的”匹配，导致出错，你可以这样
print "$count{ \"fred\" }";

[perl] perl 中二维哈希hash 与python 二维字典dict

(1)首先，python 中存储和读取二维字典dict；则是利用嵌套存储字典的方式

输出内容为：

perl 中的使用没有python 方便，涉及到二维hash 的字典，需要说明一种写法;perl 中写法比较多

等效于

已知 key1,想遍历 key2 ;涉及到解引用的方法，其实就是把 hashref（ARRAY(0x1dd97f0)）转换为真正的目标内嵌的hash,对于python 的结果，获得{’bbb’: ’value’} 这个hash

补充解法，将下列符号放在内容是reference 的变量前面就代表将这个reference 变成这个类型
% 代表整个 hash 哈希，使用{} 代表（python dict）
@ 代表整个 array 数组，使用代表（python list）
$ 代表一个标量（python 中普通变量）
& 代表一个子函数（python 中 def 函数）

另外的也可以直接用 -》符号解

补充测试

返回内容为：

参考：
Perl中的引用和解引用

Perl – 遍历二维Hash

perl 哈希keys是按顺序排的吗

不是，存入的时候hash有自己的顺序，读出来可能跟存入的时候的顺序不同。不过可以通过其他方法使其输出的时候按照一定的顺序

Perl哈希怎样实现输出的顺序还是按照文件里的顺序

哈希可能不会按照文件里的顺序存储在内存中，因为它存储的规则是怎么舒服怎么存
当执行
%hash = ("a" =》 10, "b" =》 50, "c" =》 30);
foreach (keys %hash)
{
print $_ . " =》 " . $hash{$_} . "\n";
}
看到的输出结果很可能不是当初赋值时的顺序。
可以使用 sort给键值排序
foreach (sort keys %hash)
{
print $_ . " =》 " . $hash{$_} . "\n";
}
此时看到的结果会根据字母顺序进行排序。
还可以使用@key = sort{$hash{$a} 《=》 $hash{$b}}keys %hash;
这样就是根据哈希键对应的值进行排序，此时是按数字大小进行升序排序。将$a和$b的位置调换就是降序，如@key = sort{$hash{$b} 《=》 $hash{$a}}keys %hash;
foreach (@key)
{
print $_ . " =》 " . $hash{$_} . "\n";
}
结果是根据键值进行排序。