如何将变量传递到 Perl 脚本中的 URL 中？

Question

如何将变量传递到 Perl 脚本中的 URL 中？ 我正在尝试将数组中的变量传递给 url。由于某种原因它不起作用。我不确定我做错了什么。代码大致如下：

@coins = qw(Quarter Dime Nickel);

foreach (@coins) {
  my $req = HTTP::Request->new(POST =>'https://url/$coins.com');
 } 

这不起作用，因为 $coins 不会分别切换到 Quarter、Dime、Nickel。

我做错了什么？

Answer 1

首先，变量不会插入单引号字符串中：

my $req = HTTP::Request->new(POST => "https://url/$coins.com");

其次，任何地方都没有定义变量 $coins：

foreach my $coin (@coins) {
  my $req = HTTP::Request->new(POST => "https://url/$coin.com");
 }

另外，请确保使用 严格 和警告。

您还应该投入一些时间来正确学习 Perl。

Answer 2

使用

'https://url/' . $_  . '.com'

而不是你的

'https://url/$coins.com'