file-find

0열

1답변

설정 파일을 읽고 파일에 언급 된 크기로 나열된 디렉토리를 삭제하려고합니다. 지금까지 나는 for 루프와 this- open FILE, 'C:\reports\config.txt' or die $!; my $size_req; my $path; my $sub_dir; my $count; my @lines = <FILE>; foreach $_ (@l

0열

1답변

Find : Perl에있는 파일 - 심볼릭 링크 디렉토리를 통해 검색

File 작성 방법을 아는 사람은 누구입니까? 심볼릭 링크 디렉토리를 통해 검색 할 수 있습니까? 내가 /home/alex/mydir1 에서 실제 디렉토리와 여기 /home/alex/mydir1/test -> ../mydir2 내부 심볼릭 링크 디렉토리가 나의 코드 : #!/depot/perl-5.8.3/bin/perl use strict; us

0열

1답변

powershell에서 파일의 경로 및 제품 버전 찾기

Powershell 스크립트를 만들어 동일한 컴퓨터 또는 네트워크의 다른 컴퓨터에서 희생 파일 (.exe)을 검색하고 파일의 모든 경로를 반환하도록 시도합니다. 각각 의 제품 버전은 나는 아래의 코드를 사용하지만, 난 단지 경로를 얻을 수있었습니다 만 $filename = 'example.exe' (gdr -PSProvider 'FileSystem' | %

0열

1답변

-e와 -d를 사용하지 않고 프롬프트 입력과 일치하는 Perl 파일 찾기 ... File :: Find only way?

안녕하세요, stackoverflow 친구들! 다음 과제가 주어졌으며 파일 또는 디렉토리가 있는지 확인하는 방법을 배우고 싶습니다. "사용자에게 하나의 매개 변수를 입력하라는 메시지를 표시합니다 (이 스크립트는 하나의 매개 변수 만 사용하며 사용자 입력에 0 개 또는 여러 개의 매개 변수가 포함되어 있으면 경고/오류를보고합니다). 입력 매개 변수가 파일 이

1열

3답변

perl File :: 찾기 - 특정 조건의 파일을 삭제 한 다음 비어있는 경우 상위 폴더 삭제

File :: Find를 사용하려고합니다. 1) 지정된 폴더와 하위 폴더를 통해 30 일이 지난 파일을 삭제합니다. , 그리고 b) 부모 폴더가 모든 삭제 후에 비어 있으면 삭제하십시오. 나무의 아래로 내려 가서까지 그것의 방법을 작동합니다 내가 그 finddepth을 (생각했다 use strict; use warnings; no warnings 'un

4열

1답변

네트워크 드라이브에서 Perl로 파일 읽기

우리 네트워크의 일부 루트 디렉토리에서 시작하는 모든 디렉토리에서 pdfs에 대한 문서 인벤토리를 수행하는 펄 스크립트를 작업 중입니다. 스크립트는 로컬에서 잘 실행되지만 네트워크 드라이브에서 파일을 읽을 수는 없습니다. 나는이 내가 현재 디렉토리에있는 디렉토리를 my $homeDir = Tk::MainWindow->new->chooseDirectory;

3열

1답변

펄 파일 : : 찾기 :: 규칙

내가 파일을 사용하는 방법을 찾고 있어요 chdir /tmp; my @dir=("test" "abc" "def") 같은 배열의 디렉토리 세트가 :: 찾기 :: 모든 찾을 규칙 배열에서 디렉토리를 제외/tmp에있는 파일 은 재귀 적으로이지만 @dir에있는 파일은 제외합니다. 내가 my $rule = File::Find::Rule->new; $rule-

-1열

1답변

AWK를 사용하여 수정 된 파일 선택

AWK가 지정된 도구로 작업하는 중입니다. 작업은 파일을 나열하는 것입니다 수정 오늘 (같은 날 스크립트가 실행됩니다) 크기 1메가바이트 이하 (크기 < = 1048576 바이트) 사용자의 입력의 검색을 시작할 위치를 지시하는 것입니다. 파일을 반복적으로 검색하십시오. 스크립트 : #!/bin/bash #User's input target for searc

0열

1답변

와일드 카드를 사용하여 File :: Find perl 모듈에서 디렉토리 목록을 가져올 수 있습니까?

필요한 디렉토리가 들어있는 디렉토리 경로를 나열하려고합니다. 예를 들어 는 : /usr1 | | ----------------------------------------- | | /local1 /local2 |

2열

1답변

이 Perl 파일을 최적화하는 방법은 무엇입니까?

요구 사항 : 디렉토리는 "DIR1"을 제외한 모든 이름을 가질 수 다음 기준에 일치하는 입력 디렉토리 아래에 디렉토리의 수를 얻으려면, "DIR2", "DIR3"등 디렉토리 "DIR1", "DIR2", "DIR3"내부 등, 혼자 디렉토리의 수를 필요에 파일 use strict; use File::Find; my ($inputdir) = @ARGV;