小编dou*_*own的帖子

如何查看我有权在目录中读取的文件?

我可以看到单个文件的权限ls -l.

如果目录中有数百或数千个文件 - 大多数我无法阅读,我如何查看我有权阅读哪些文件?

unix linux bash

1
推荐指数
1
解决办法
99
查看次数

在Powershell中的webget

有没有相当于的命令 webget在WindOS的PowerShell中?

我正在尝试创建一个脚本来从网站下载所有公开可用的文件.我正在制作自定义脚本,因为我需要将文件存储在特定的目录结构中(取决于名称,类型和大小).

powershell

1
推荐指数
1
解决办法
6789
查看次数

查找具有超过特定文件大小的特定扩展名的文件

我在bash中使用find命令时遇到问题.我正在尝试查找以.c结尾且文件大小超过2000字节的文件.我以为会是:

find $HOME -type f -size +2000c .c$
Run Code Online (Sandbox Code Playgroud)

但显然这是不正确的.

我究竟做错了什么?

linux bash find

1
推荐指数
1
解决办法
285
查看次数

`if`命令中的等式测试返回错误消息"没有这样的文件或目录"

我正在写一个shell脚本,我正在做

if ["$item0" == "$item1"]
then
echo match
fi
Run Code Online (Sandbox Code Playgroud)

但它在运行时会在行上给出错误消息"没有这样的文件或目录".如果有帮助,上面的项目确实包含文件路径.

bash shell if-statement

1
推荐指数
1
解决办法
776
查看次数

点标点符号后,VIM不会替换单词.怎么改呢?

我有以下问题

这是文字:

printf("sysname %s",ut.sysname);
Run Code Online (Sandbox Code Playgroud)

我想用vim sysname逐行替换.我在我的gvim中输入命令:

:s/sysname/version
Run Code Online (Sandbox Code Playgroud)

我想得到这样的输出:

printf("version %s",ut.version);
Run Code Online (Sandbox Code Playgroud)

但我得到这样的输出:

printf("version %s",ut.sysname);
Run Code Online (Sandbox Code Playgroud)

我究竟做错了什么?

vim

1
推荐指数
1
解决办法
131
查看次数

用于双精度值或空字符串的正则表达式:^ [0-9] \ d *(\。\ d +)?$

为了验证文本是否为双精度值,我使用^[0-9]\d*(\.\d+)?$。但是,我应该使用什么正则表达式,以便匹配空字符串或双精度值?

regex

1
推荐指数
1
解决办法
1035
查看次数

Perl重定向到错误的执行路径

我在使用Perl时遇到了一些问题.在执行期间,我收到此错误.

Can't locate XML/LibXML/NodeList.pm in @INC (@INC contains: /usr/local/lib64/perl5 /usr/local/share/perl5 /usr/lib64/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib64/perl5 /usr/share/perl5 .) at /usr/local/lib64/perl5/XML/LibXML.pm line 25.
Run Code Online (Sandbox Code Playgroud)

但当我尝试使用locate命令找到此文件时,我发现它. /usr/local/lib/perl5/site_perl/5.18.0/x86_64-linux/XML/LibXML/目录.

我已经安装了不同的perl软件包,它们都安装正确.如果我将单个文件放在指定的位置,那么它会抱怨另一个文件.所以手动放置文件不是一个好主意.

那么我如何改变它的路径,以便它可以从正确的目录执行文件?

编辑

Can't locate loadable object for module XML::LibXML in @INC (@INC contains: /usr/local/lib64/perl5 /usr/local/share/perl5 /usr/lib64/perl5/vendor_perl /usr/share/perl5/vendor_perl /usr/lib64/perl5 /usr/share/perl5 .) at /usr/local/lib64/perl5/XML/LibXML.pm line 154
[Wed Jul 03 10:15:13 2013] [error] [client 192.73.242.136] BEGIN failed--compilation aborted at /usr/local/lib64/perl5/XML/LibXML.pm line 154.
[Wed Jul 03 10:15:13 2013] [error] [client 192.73.242.136] Compilation failed in require at /var/www/cgi-bin/astpp/astpp-cdr-xml.cgi line 23. …
Run Code Online (Sandbox Code Playgroud)

perl

1
推荐指数
1
解决办法
2067
查看次数

简单的Perl字符串匹配特殊字符即'

my $var_cot_descn="Veteran's Affairs";
my %cot_descn= ("Correctional","Veteran's Affairs","State Pharmacy Assistance Program","VA Medical Center","VA Mail Order Pharmacy","PHS 340B Entity");

if (exists $cot_descn{$var_cot_descn}){
    print  "CustomerDomain=\"GOV\"
        />
        </Org>
        \n";
}
else{
    print  "CustomerDomain=\"COM\"
        />
        </Org>
        \n";
}
Run Code Online (Sandbox Code Playgroud)

一切正常,除非我与"退伍军人事务"进行比较,导致if条件失败.

我怎样才能解决这个问题?

perl

1
推荐指数
1
解决办法
79
查看次数

首先按字母顺序排序,然后在串联密钥上进行数字排序

给定一组Letter_Number组合,我如何先按字母排序,然后编号:

( B_5   A_11   C_0   A_10    A_1 )
Run Code Online (Sandbox Code Playgroud)

要得到:

( A_1   A_10   A_11   B_5    C_0 )
Run Code Online (Sandbox Code Playgroud)

sorting perl

1
推荐指数
1
解决办法
1587
查看次数

如何检查变量(例如$ 3)是否存在,以便我不会收到有关"未初始化值"的警告?

我正在尝试在.csv文件上运行脚本,该脚本将英尺和英寸的大小转换为以英寸为单位的宽度和以英寸为单位的高度.

不使用严格模式时它可以正常工作,但在use warnings;设置时会返回警告消息.

我的问题出现在这里:

if ($data[$index_num] =~ /(\d+)'( (\d+)'')? x (\d+)'( (\d+)'')?/) {

    my $width = $1*12+$3;
    my $height = $4*12+$6;

    ...
}
Run Code Online (Sandbox Code Playgroud)

由于有时大小可能是5'x 8',因此不存在特殊变量$ 3和$ 6.

所有可能的大小格式如下:

  1. 5'1''x 6'7''(所有单个数字)
  2. 10'1''x 5'10''(单数字和双数字的组合)
  3. 5'x 8'(无英寸)
  4. 4'6''x 7'(无英寸和英寸的组合)

我收到的警告是:

在script.pl第47行第567行另外使用未初始化的值$ 6(+).

这种情况发生在3或4的情况下,宽度或高度都缺少英寸.

在尝试使用它们之前,我如何检查是否存在3美元或6美元?

regex perl

1
推荐指数
2
解决办法
275
查看次数

标签 统计

perl ×4

bash ×3

linux ×2

regex ×2

find ×1

if-statement ×1

powershell ×1

shell ×1

sorting ×1

unix ×1

vim ×1