Question

我有一个多级哈希，我有一个用户的头像URL。

我正在尝试使用“Jane Doe image ”创建一个单元格，但是当代码运行时，URL会发生变化。当我将其插入到Embperl模板中时，

https://foo.com/useravatar?size=small&id=11111

变成

https://foo.com/useravatar%3Fsize%3Dsmall%26id%3D11111

如您所见，特殊字符会被编码，因此找不到图像。你怎么解决这个问题？

use strict;
use warnings;

use Embperl qw( );

our $issue = {
   avatar => {
      url => 'https://foo.com/useravatar?size=small&id=11111',
   },
};

my $template = <<'__EOI__';
[+ $issue->{avatar}{url} +]
<img src="[+ $issue->{avatar}{url} +]">
__EOI__

Embperl::Execute({
   input   => \$template,
   package => __PACKAGE__,
});

这会产生：

https://foo.com/useravatar?size=small&amp;id=11111
<img src="https://foo.com/useravatar%3Fsize%3Dsmall%26id%3D11111">

当网址插入src属性之外时，它会被正确转义。但是当它被插入src属性内部时，它会被破坏。

Answer 1

您注意到的转义旨在处理

<img src="https://foo.com/useravatar?size=small&amp;id=[+ $avatar_id +]">

您可以更改转义模式。使用

<img src="[+ do { local $escmode = 1; $issue->{avatar}{url} } +]">

生产

<img src="https://foo.com/useravatar?size=small&amp;id=11111">

以URL

获取图片

https://foo.com/useravatar?size=small&id=11111

测试：

use strict;
use warnings;

use Embperl qw( );

our $issue = {
   avatar => {
      url => 'https://foo.com/useravatar?size=small&id=11111',
   },
};

my $template = <<'__EOI__';
<img src="[+ $issue->{avatar}{url} +]">
<img src="[+ do { local $escmode = 1; $issue->{avatar}{url} } +]">
__EOI__

Embperl::Execute({
   input   => \$template,
   package => __PACKAGE__,
});

Img source是一个变量，URL被编码

1 个答案: