PERL 语言中的q,qw,qr,qx,qq......符号用法

PERL 语言中的q,qw,qr,qx,qq......符号用法

在perl语言中，有两个特殊而常用的符号qq qw,分别解释如下：
qq{foobar}的意思为意思为双引号字符串，可内插变量
相当于 "foobar"
qw{foo bar}的意思为用空格分解字符串，得到列表，相当于如下语句
split(' ','foo bar') 得到的结果是'foo','bar'

字符串比较等于用 eq

q运算符对'号转义的方式
$someword = 'i /'ve some money';
可以等价于:
$someword = q~i 've some money~;

qq运算符对"号转义的方式
$someword = "i say /"ok!/".";
可以等价于:
$someword = qq~i say "ok!".~;

qw代表用空格来分隔元素,得到列表
@list = ("perl","Regular","network","web");
可以等价于:
@list = qw(perl Regular network web);

qr代表创建正则
$myword = "cnangel";
$replaceword = qr(cnangel);
$finalword = "ok" if ($myword =~ $replaceword);

引号执行运算符(quoted execution operator)，qx//
qx/uname -p -r/

q 和 qq 运算符的特点：
※ q 和 qq 必须是一个标识符，而不是标识符的部分。例如：
q (abc)      用 () 作为分界符