filehandle

    2

    1답변

    이것은 지금까지 가지고있는 코드입니다. 올바른지 궁금합니다. $handle = fopen($file, 'w') or die("can't open file"); $closed = fclose($handle); while($closed){ DOAWESOMETHINGS(); // btw I only want to have this run once f

    1

    2답변

    원격 클라이언트는 이미지 (및 일부 특수 파일 형식의 지침 파일)를 "드롭 폴더"에 업로드합니다. 업로드가 완료되면 이미지를 처리해야합니다. 스크립트가 자동으로 폴더의 모든 파일을 몇 초마다 처리하기 시작하는 것은 쉽지만 결함이있는 솔루션입니다 (파일은 한 번 처리 된 폴더에서 이동할 수 있습니다). 부분적으로 만 전송되는 큰 이미지를 처리하려고 할 때 문

    1

    3답변

    때까지 특정 라인에서 읽기 시작하고 만 라인의 첫 번째 열을 얻을 : Line 1 Line 2 Line 3 Line 4 Line 5 filename2.tif;Smpl/Pix & Bits/Smpl are missing. 항상 동일 5 줄이 있습니다, 6 번째 줄에는 데이터 읽기를 시작하겠습니다. 데이터를 읽을 때 각 행 (6 행부터 시작)은 세미

    2

    5답변

    주어진 파일 핸들에서 파일 이름을 검색하려고합니다. 나는 GetFileInformationByHandle이 유용 할 수 있지만 반환하는 구조에는 파일 이름 정보 (http://msdn.microsoft.com/en-us/library/aa363788%28v=VS.85%29.aspx)가 포함되어 있지 않은 것으로 나타났습니다. 어떻게하면됩니까? 편집 : 나는

    0

    3답변

    대신 일반적인 파일 핸들 핸들? 해당 정렬 된 파일에 대한 두 개의 포인터를 만들려고 해요 그래서 한 파일의 줄이 다른 줄보다 "적은"또는 "큰"여부에 따라 포인터를 전진시킬 수 있습니다. 참고 : 입력 파일이 BIG라고 가정합니다. 내가 제대로 이해하면

    0

    4답변

    빠른 질문입니다. 변수에 대해 완전히 잘못하고 있다고 확신하지만, 여기에 문제가 있습니다. 첫째 코드 : #!/usr/bin/perl use strict; use warnings; my $File = "file.txt"; my $CurrentLinesCount = `wc -l < $File` or die "wc failed: $?"; chomp(

    -1

    1답변

    IO :: Handle과 IO :: File은 모두 IO라는 핵심 패키지에 포함되어 있습니다. 그것들은 펄 I/O 서브 시스템을위한 객체 인터페이스이다. 모든 스크립트에서 IO :: Handle/IO :: File을 사용하면 open은이 클래스의 객체도 반환합니다. (DBI::ProxyServer: Problem with writing a log-file에

    3

    3답변

    여기에 문제가 있습니다 : 클라이언트로부터 요청을 받고, 요청으로 인해 (일부 모듈에서) 함수를 실행하는 데몬을 가지고 있습니다. 클라이언트. fork() 후에 STDIN, STDOUT 및 STDERR을 닫습니다. 하나의 기능은 dmesg를 검사하는 것입니다. 이를 위해 을 통해 dmesg 출력을 엽니 다 (DMESG, "/ bin/dmesg |"). 필자

    -1

    1답변

    이는 작품 좋은,하지만 난 이해가 안 한 부분이있다 : print $_->{"input"}." (".localtime(time).") ".$_-> read; 이 무엇을 인쇄 않습니다를? 수정 한 경우 : print "$_"; 일부 오류가 있습니다. 왜? #!/usr/local/bin/perl use File::Tail; chdir("/var/l

    0

    1답변

    결과에서 IP 주소를 얻기 위해 몇 가지 옵션을 사용해 왔습니다 ...하지만 작동하지 않는 것 같습니다 ... 왜? 누구든지 제안 할 수 있습니까? 그 결과를 룰 파일의 IP 주소와 비교하고 찾아서 사용자에게 경고를 보내고 싶습니다. 나는 어떻게해야합니까? #!/usr/local/bin/perl use File::Tail; chdir("/var/lo