电脑用户 perl

2

我尝试下面添加一个新行到文件的顶部但无济于事 1）似乎工作但我怎么做到位？perl -lpe'BEGIN {print“somestring \ n”}'文件 2）sed -i.bak -e'1i somestring \ n'。/ file不会在OS X中添加换行符

macos sed perl

1

无法生成Awstats报告-对awstats.pl的权限被拒绝

我刚刚在运行CentOS 6.3和nginx的服务器上安装了Awstats 7.1的新副本。当我尝试运行此命令来生成报告时： /usr/local/awstats/tools/awstats_buildstaticpages.pl -update -config=mydomain.com -dir=/srv/apps/mydomain/awstats -awstatsprog=/usr/local/awstats/wwwroot/cgi-bin/awstats.pl 我收到以下错误： sh: /usr/local/awstats/wwwroot/cgi-bin/awstats.pl: Permission denied 我尝试过的 chmod 755 / usr / local / awstats 使用“ su-”运行命令将用户/组更改为“ nginx” 任何帮助深表感谢。

permissions centos perl nginx

1

awk + sed +匹配复杂字符串

我需要有用的命令来将字符串“ / pci ... / pci ... / pci .... / scsi .... / disk ...”与awk或sed匹配？（我需要将此命令放入我的ksh脚本中）备注1 [...]可以是任何字符串，“ pci pci pci scsi disk”是默认字符串。备注2我有Solaris计算机，因此语法应适合Solaris 例 prtpicl -v |grep :disk0 | awk '{print $2}' 给输出 /pci@0/pci@0/pci@2/scsi@0/disk@0

linux sed perl solaris awk

Questions tagged «perl»