小编Rah*_*ikh的帖子

如果我不知道确切的文件路径,Perl如何检测文件?

我正在尝试在特定路径/位置下搜索文件.

Sample Path - /var/log/<parent1>/<parent2>/<folder>/file
Run Code Online (Sandbox Code Playgroud)

现在,有两个目录,<parent1><parent2>在示例路径中显示.这两个目录有一些随机名称,因此无法预测其名称.除了这两个目录名,路径的每个部分都是已知的.

我尝试过这样的事情 -

if ( -e $filePath ) {
    # Do something here
}
Run Code Online (Sandbox Code Playgroud)

但它似乎没有用.那么,如何搜索特定文件?

谢谢!

regex linux perl search path

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

如何将自动递增数字添加到数组?

我正在通过以下代码读取perl中的文件内容

my @files = glob("$PATH/*");
foreach my $file (@files){
    open(MYFILE,"<$file");
    my @fileContent = <MYFILE>;
    close(MYFILE);
}
Run Code Online (Sandbox Code Playgroud)

现在,我想在每行前加上自动递增数.就像是 -

fileContent[0] = 1: This
fileContent[1] = 2: is
fileContent[2] = 3: a
fileContent[3] = 4: text
fileContent[4] = 5: file.
Run Code Online (Sandbox Code Playgroud)

有人知道这样做的有效方法吗?

谢谢!

arrays perl file

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

标签 统计

perl ×2

arrays ×1

file ×1

linux ×1

path ×1

regex ×1

search ×1