perl - perl中如何赋值

Question

获取用户配置文件详细信息作为响应

$response = $client->fql->query( query => 'SELECT name, email, birthday, username, first_name, last_name, pic FROM user WHERE uid = me()');

之后打印如下语句：

print join "\n Name:",  sort map { $_->{name} } @$response;
print "</br>\n";
print join "\n Email:",  sort map { $_->{email} } @$response;
print "</br>\n";

sort map { $_->{email} } @$response; 

我想将其分配给一个变量并比较和检查这些值。如何将值分配给变量并存储？

Answer 1

“如何在 perl 中赋值？”

更多信息。在http://perldoc.perl.org/perlop.html#Assignment-Operators。

“ ...比较和检查值”

更多信息。在http://perldoc.perl.org/perlop.html#Smartmatch-Operator。

“……然后存储？”

 o_O