引用Word中的Perl字符串？

Question

就像我的日常路障一样。这可能吗？ qw中的字符串？

#!/usr/bin/perl

use strict;
use warnings;

print "Enter Your Number\n";
my $usercc = <>;

##split number
$usercc =~ s/(\w)(?=\w)/$1 /g;

print $usercc;

## string in qw, hmm..

my @ccnumber = qw($usercc);

我得到参数“$ usercc”在

的乘法（*）中不是数字

由于

Answer 1

否
来自：http://perlmeme.org/howtos/perlfunc/qw_function.html

  

工作原理

     

qw()从字符串中提取单词   使用嵌入式whitsepace作为   分隔符并返回单词作为   名单。请注意，这发生在   编译时间，这意味着   呼叫qw()将替换为列表   在代码开始执行之前。

此外，您传递给qw（）的字符串中无法插值。

Answer 2

而不是那样，使用

my @ccnumber = split /\s+/, $usercc;

您可能希望想要什么，将$usercc拆分为空格。