- html - 出于某种原因,IE8 对我的 Sass 文件中继承的 html5 CSS 不友好?
- JMeter 在响应断言中使用 span 标签的问题
- html - 在 :hover and :active? 上具有不同效果的 CSS 动画
- html - 相对于居中的 html 内容固定的 CSS 重复背景?
以下脚本的输出将是当前日期,例如“26 Dec Mon”
#!/usr/local/bin/perl
@months = qw( Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec );
@days = qw(Sun Mon Tue Wed Thu Fri Sat Sun);
($sec,$min,$hour,$mday,$mon,$year,$wday,$yday,$isdst) = localtime();
print "$mday $months[$mon] $days[$wday]\n";
最佳答案
没有。qw(a b c)
是('a', 'b', 'c')
的快捷方式。它返回一个列表(用词来说,这就是w
所代表的意思)。q()
只是编写单引号的另一种方法,即q(a b c)
与'a b c'
相同。它返回一个字符串而不进行插值。qq()
是一种写双引号的方法,即qq(a b c)
与"a b c"
相同。它返回一串带有插值的。
有关详细信息,请参见http://perldoc.perl.org/perlop.html#Quote-and-Quote-like-Operators。
当要引用的字符串包含(很多)单引号和/或双引号并且您想要避免转义时,有时会使用q()
和qq()
语法:
my $s1 = "This \"contains\" quotes - \" - and \"is\" no fun to \"type\"";
my $s2 = qq(This also "contains" quotes - " - but "is" easier to "type");
关于perl - 我可以在以下perl脚本中使用qq或q代替qw吗?,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/41334509/
我正在阅读 Log4Perl来自 perl.com在教程中它说:use Log::Log4perl qw(:easy); 什么是:在 easy 前面?它是某种特殊的语法吗? 最佳答案 它是特殊语法,用
我正在为一些数据库备份定制一个开源 Perl 脚本。我对 Perl 了解不多。有人能告诉我如何将参数传递给 qw[] 吗? 例如原始代码是这样的 @selected_databases = qw[t
我知道qw()功能,但我在很多地方都看到了 qw(:ALL) 的使用. 使用它有什么好处,在哪里可以找到使用 qw(:ALL) 的示例? 最佳答案 qw(:ALL)表示与 (":ALL") 完全相同.
my @flavors = qw/sweet,sour cherry/; 产生“可能尝试用逗号分隔单词” - 在我想要文字逗号的情况下,如何禁用该警告? 最佳答案 禁用 warnings本地: my
抱歉,这是一个非常基本的问题,但是我是Perl的初学者,因此无法在SO(或其他任何地方!)上找到此问题的合适解释。我知道我可以写一些示例并尝试破译,但我确实可以使用专家的一些知识。 我正在浏览一些代码
qw 代表什么?是否有任何文档可供我阅读? 另外,它与数组声明有什么关系?例如: #!/usr/bin/perl @days = qw/Mon Tue Wed Thu Fri Sat Sun/; 最佳
假设一个 Perl 脚本是这样的: my @a = ( 1, 2, 3 ) ; my @b = qw( foo bar baz ) ; 使用选项执行 p
做什么 use Cwd qw(); 在perl中是什么意思? 我知道 qw 给 () 中的每个元素加上引号 但是这个案子呢? 最佳答案 qw()是一种编写空列表的奇特方式。做()会短两个字符。 将一个
我有一个 perl 模块 .pm 文件,其中包含我的子例程,它看起来像这样: package test; use strict; use vars qw($VERSION @ISA @EXPORT $
我正在尝试向 SGE 提交作业。过去它也以同样的方式为我工作。现在,所有作业都陷入了 qw 状态。 “qstat -g c”输出: > CLUSTER QUEUE CQLOAD USED A
我有一个 perl 模块 .pm 文件,其中包含我的子例程,它看起来像这样: package test; use strict; use vars qw($VERSION @ISA @EXPORT $
自从最近升级了 Debian 以来,Perl 一直在提示 qw 运算符周围没有额外的括号。 作为系统管理员,这是 Not Acceptable 。它正在左右和中间破坏 mod_perl 应用程序。 如
我是 django 的新手并且被 slug 击中了,现在我很困惑如何使用 ID 参数并转换为 slug 网址.py url(r'^deletePost/(?P[\w-]+)/$', views.de
我是 perl 本地人,但最近经常使用 python。我想知道是否有类似于 perl qw//运算符的东西,它是在创建不包含空格的多个字符串列表时绕过键入多个引号和逗号的快捷方式。 示例:@list
创建了一个包并想使用签名。 package Foo; use strict; use warnings; use feature qw(signatures); no warnings qw(expe
任何人都知道 R 是否有类似引号的运算符,如 Perl 的 qw()用于生成字符向量? 最佳答案 不,但你可以自己写: q q(a, b, c) [1] "a" "b" "c" 关于r - R 是否
这是一个令人尴尬的问题,但为什么这条线有效而另一条无效? 工作线: use strict; use warning; use Wx qw(:everything); my $dialog = Wx::
我有工作代码,但我试图理解它为什么有效。我还试图了解有关 Perl 5 内部结构的更多信息(perlbrew、perl-5.26.1、Cygwin x64)。 我从perlvar知道和 strict
我是一名优秀的程序员,十分优秀!