Тип аргумента для ключей на ссылке не должен быть беспроблемным

Question

Я очень новичок в perl, и мне была поручена поддержка веб-страницы. Я нашел ошибку, которую я не знаю, как исправить.

Perl-скрипт останавливается по следующему коду.

my @failedTests = (sort(keys ($TestResultsData{$currPlatform}{$currDate}{failedtests}))); 
while (@failedTests) 
{ 
... 

Сообщение об ошибке:

Type of argument to keys on reference must be unblessed hashref or arrayref. 

Может, что строка кода быть переписана так, что она работает?

Answer 1

Значение $TestResultsData{$currPlatform}{$currDate}{failedtests} - это благословенный хэш. keys трусливо отказывается работать на благословенных хэшфитах, потому что это нарушит иллюзию инкапсуляции и перегрузки.

(старые версии Perl не принимать hashref вообще - вам нужно передать ей надлежащий хэш.)

Попробуйте вручную разыменование hashref в хэш с помощью:

my @failedtests = sort keys %{ $TestResultsData{$currPlatform}{$currDate}{failedtests} };