Perl - 散列和列的散列:(
我有一组大小可变的字符串,例如: AAA23 AB1D1 A1BC AAB212 我的目标是按字母顺序排列并为列收集唯一字符,例如: 第一列:AAAA 列:AB1A 等等... 第…
如何在 Perl 中创建哈希的哈希?
根据我目前对 Perl 中哈希值的理解,我希望这段代码能够打印“hello world”。它什么也不打印。 %a=(); %b=(); $b{str} = "hello"; $a{1}=%b; $b=(); …
如何在 Perl 中将多个哈希值合并为一个哈希值?
在 Perl 中,我如何得到这个: $VAR1 = { '999' => { '998' => [ '908', '906', '0', '998', '907' ] } }; $VAR1 = { '999' => { '991' => [ '913', '…
如何访问嵌套 Perl 散列的值?
我是 Perl 新手,我有一个非常简单的问题,但在查阅我的 Perl 书籍时找不到答案。 打印结果时, Dumper($request); 我得到以下结果: $VAR1 = bless( …
如何根据另一个哈希的键/值删除[子]哈希?
假设我有两个哈希值。其中一个包含一组数据,只需要保留另一个哈希中显示的内容。 例如, my %hash1 = ( test1 => { inner1 => { more => "alpha", ev…
如何在 Perl 中迭代 Hash(of Hashes)?
我有哈希,其中键的值是其他哈希。 示例: {'key' =>; {'key2'=>; {'key3'=>; 'value'}}} 我如何迭代这个结构?…
如何在散列中引用数组中的 Perl 散列?
这是我正在使用的代码片段: my %photo_details = ( 'black_cat' => ( ('size' => '1600x1200', 'position' => -25), ('size' => '1280x1024', 'posit…
如何获取 Perl hash-of-hashes 中的二级密钥?
我需要获取哈希中某个键的所有值。哈希看起来像这样: $bean = { Key1 => { Key4 => 4, Key5 => 9, Key6 => 10, }, Key2 => { Key7 => 5, Key8 => 9, …
如何在脚本执行期间创建匿名哈希并将其添加到已知哈希?
我将尝试用一个例子来说明这一点。举一个哈希的哈希的常见示例: my %HoH = ( flintstones => { lead => "fred", pal => "barney", }, jetsons => { l…
如何在 Perl 中创建哈希数组并循环遍历它们?
我正在尝试创建一个哈希数组,但在循环该数组时遇到问题。我已经尝试过这段代码,但它不起作用: for ($i = 0; $i<@pattern; $i++){ while(($k, $v)= …
如何在 Perl 中创建嵌套哈希作为常量?
我想要在 Perl 中执行与以下 Ruby 代码等效的操作: class Foo MY_CONST = { 'foo' => 'bar', 'baz' => { 'innerbar' => 'bleh' }, } def some_method…
按值搜索数组中的哈希值
我有一个函数可以将 Excel 数据提取到哈希数组中,如下所示: sub set_exceldata { my $excel_file_or = '.\Excel\ORDERS.csv'; if (-e $excel_file_o…
如何对值为数组引用的 Perl 哈希进行排序?
嘿,我只是想知道是否有一个很酷的“oneliner”可以对我的散列保存数组引用进行排序。 所以我的哈希中有一堆键/值,例如: $DataBase{$key} = \@value…