如何将参数传递给perl qw []？

发布时间：2020-12-15 23:25:24 所属栏目：大数据来源：网络整理

导读：我正在为一些数据库备份定制一个开源Perl脚本.我对Perl知之甚少.有人能告诉我如何将参数传递给qw []？例如,原始代码是这样的 @selected_databases = qw[testdb1 testdb2 testdb3]; 我想把它转换成下面的东西 $_dblist = "testdb1 testdb2 testdb3";@selecte

我正在为一些数据库备份定制一个开源Perl脚本.我对Perl知之甚少.有人能告诉我如何将参数传递给qw []？

例如,原始代码是这样的

@selected_databases  = qw[testdb1 testdb2 testdb3];

我想把它转换成下面的东西

$_dblist = "testdb1 testdb2 testdb3";
@selected_databases  = qw[$_dblist];

但它不起作用.有人能告诉我如何将变量传递给qw []？

解决方法

qw不支持插值.按照 perl-doc.因此,你不能这样做,它将无法正常工作.要实现您的目标,请使用拆分功能.

$_dblist = "testdb1 testdb2 testdb3";
@selected = split(' ',$_dblist);

（编辑：李大同）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!