Perl - 如何将哈希转换为查询字符串?

2024-02-04

如何将哈希值转换为查询字符串?我想找到一个不涉及使用 CGI 模块的解决方案。这是我想做的一个例子,但不知道最好和最优雅的方法是什么,因为我对 Perl 比较陌生。

Hash:

my $data = {
         'key1' => 'value1',
         'key2' => 'value2',
         'key3' => 'value3',
         'key4' => 'value4'
};

到所需的查询字符串:

key1=value1&key2=value2&key3=value3&key4=value4

use URI qw( );
my $url = URI->new('', 'http');
$url->query_form(%$data);
my $query = $url->query;

如果您实际上正在尝试构建 POST 请求,请查看HTTP::请求::通用 http://search.cpan.org/perldoc?HTTP::Request::Common's POST.

本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)

Perl - 如何将哈希转换为查询字符串? 的相关文章

随机推荐