CGI.pm не имеет эквивалента метода upload_fieldnames()
, но вы можете синтезировать что-либо, используя комбинацию методов param()
и upload()
.param()
выдаст вам список всех имен параметров, и вы можете использовать upload()
, чтобы проверить, является ли каждое из них загружаемым файлом.
my @upload_fieldnames;
foreach (param()) {
push @upload_fieldnames, $_ if upload($_);
}
Или, как однострочный:
my @upload_fields = grep { upload($_) } param();
Обновление: Я просто хотел добавить комментарий к этому.
Я пытаюсь адаптировать этот код для использования CGI.pm, потому чтоэто более широко доступно для CentOS 7
Я не уверен, какой у вас вариант использования здесь, но я сильно подозреваю, что ваше время будет лучше потрачено на разработку, как установить необходимые модули, а неОбойти отсутствие определенных модулей.
Если это вам вообще поможет, я просто собрал RPM CGI :: Simple и загрузил его в свой RPM-репозиторий со скоростью rpm-mag-sol.ком .