คำถามติดแท็ก perl

ฉันใหม่เพื่อ Perl ฉันกำลังเขียนสคริปต์ด้านล่างเพื่อพิมพ์ข้อมูลเวลาการบูตระบบจากคำสั่ง windows systeminfo. ดูปัญหาบางอย่างที่นี่ ฉันได้ผลลัพธ์เช่นนี้ มีคนช่วยฉันได้ use strict; use warnings; my $filename = 'sysinfo.txt'; my @cmdout = `systeminfo`; open(my $cmd, '>', $filename) or die "Could not open file '$filename' $!"; print $cmd @cmdout; foreach my $file (@cmdout) { open my $cmd, '<:encoding(UTF-8)', $file or die; while (my $line …

perl 

ฉันต้องการเรียกใช้สคริปต์ Perl โดยอัตโนมัติทุกวันใน win32 กับผู้ใช้ที่แตกต่างจากผู้ใช้ที่เข้าสู่ระบบในปัจจุบันอาจมีใครให้แนวคิดได้บ้าง? ?

windows  services  perl 

ฉันมีเครื่องเสมือน Windows XP Professional x64 เพื่อเรียกใช้กระบวนการ HLDS บางอย่าง ฉันเลือกรุ่น x64 เนื่องจากฉันมีใบอนุญาตแล้วและเนื่องจากใช้เคอร์เนล Windows Server 2003 มันจะเชื่อถือได้มากขึ้น (และนานกว่า) กว่า Windows XP Professional x86 กระบวนการ HLDS มีเนื้อหาเกมของพวกเขาอัปเดตจากพื้นที่เก็บข้อมูลการโค่นล้มของเราซึ่งต้องใช้การขนส่ง HTTPS เรามี CA ของเราเองสำหรับเรื่องนี้และใบรับรองทั้งหมดของเราใช้ลายเซ็นต์ SHA-2 (SHA512) พร้อมคีย์ RSA 4096 บิต เวอร์ชันย่อยทำงานได้ดีกับสิ่งนี้ทันที ฉันยังใช้สคริปต์ Perl เพื่อตรวจสอบพื้นที่เก็บข้อมูลการโค่นล้มเป็นระยะเพื่อแก้ไขใหม่ทุก 3 นาทีซึ่งจะดาวน์โหลดการอัปเดตหากมีและหยุด / เริ่มกระบวนการ HLDS หากการอัพเดตมีไบนารีเซิร์ฟเวอร์ ปัญหาคือไม่มีแอปพลิเคชันจะอ้างสิทธิ์ลายเซ็นต์ของใบรับรอง SSL ของเราว่าถูกต้อง Chrome, IE8 และ …

windows-xp  ssl  perl  windows-server-2003  sha-2 

ฉันใหม่กับการเขียนโปรแกรม CGI ใน Perl เพื่อเรียนรู้มันฉันติดตั้ง xampp 2 วันกลับ แต่ฉันไม่สามารถรันรหัส perl ของฉันได้ รหัสไปเป็น folows: #!/usr/bin/perl use CGI; $co = new CGI; print $co->header, $co->start_html(title=>'CGI Example'), $co->center($co->hi('Subhayan welcome to CGI')), $co->end_html; ได้บันทึกรหัสในไฟล์ข้อความชื่อ: Subhayan1.cgi และเก็บไว้ในโฟลเดอร์ cgi-bin ภายใต้โฟลเดอร์ xampp ในไดรฟ์ C เมื่อฉันพยายามที่จะดำเนินการนี้ผ่านทางเว็บเบราว์เซอร์ของฉันพิมพ์: " http: //localhost/cgi-bin/Subhayan1.cgi " มันปรากฏขึ้นพร้อมกับ "หน้าไม่พบวัตถุ" ฉันตรวจสอบไฟล์กำหนดค่า apache ภายใต้: xampp / apache …

perl 

ฉันมีสคริปต์ Perl ที่สร้างผลลัพธ์ utf8 ฉันลองใช้ Set-Content เพื่อเขียนไฟล์ utf8 ตามที่Powershell เขียนทับ Perl binmode แนะนำหรือไม่ . perl -S testbinmode.pl | Set-Content "binmode.txt" -Encoding Byte สร้างข้อผิดพลาด "Set-Content: ไม่สามารถดำเนินการเข้ารหัสไบต์ได้เมื่อใช้การเข้ารหัสไบต์เนื้อหาจะต้องเป็นประเภทไบต์" perl -S testbinmode.pl | Set-Content "binmode.txt" -Encoding UTF8 ไม่สร้างข้อความแสดงข้อผิดพลาด แต่ไม่ได้เขียนไฟล์ utf8 ที่ถูกต้องเช่นกัน ผลลัพธ์ของสคริปต์ perl จะแสดงอย่างถูกต้องในหน้าต่าง Powershell วิธีที่ถูกต้องในการเขียนเอาต์พุตนั้นไปยังไฟล์ที่เข้ารหัส utf8 คืออะไร? ขอบคุณ ปรับปรุง: ฉันได้เห็นการตอบสนองหลาย ๆ นี้และปัญหาที่คล้ายกันที่นี่ที่ลิงค์อ้างถึงข้างต้นและที่https://stackoverflow.com/questions/40098771/changing-powershells-default-output-encoding-to-utf-8 ไม่มีใครทำงานได้เลยทำให้ฉันเชื่อว่าไม่มีใครผ่านการทดสอบ …

powershell  unicode  perl 

ฉันมีเซิร์ฟเวอร์ที่มี OS RHEL 6 และ Apache / 2.2.22 บางครั้งฉันพบข้อผิดพลาดในบันทึกข้อผิดพลาด Apache: [ข้อผิดพลาด] [ไคลเอ็นต์ XXXXX] หมดเวลา: nslookup ("ประเภท" => "MX", "โฮสต์" => "hotmail.com") ที่ /usr/local/share/perl5/Net/Nslookup.pm บรรทัดที่ 114 [ข้อผิดพลาด] [ไคลเอ็นต์ XXXXX] หมดเวลา: nslookup ("ประเภท" => "MX", "โฮสต์" => "hotmail.com") ที่ /usr/local/share/perl5/Net/Nslookup.pm บรรทัดที่ 114 [ข้อผิดพลาด] [ไคลเอนต์ XXXXX] หมดเวลา: nslookup ("พิมพ์" => "MX", "โฮสต์" => …

perl  dns 

ฉันสามารถหาข้อผิดพลาดนี้ได้ในหน้าต่างดีบักของ Pidgin (เวอร์ชั่น Pidgin 2.12.0, libpurple 2.12.0): (17:57:27) plugins: C:\Program Files (x86)\Pidgin\plugins\perl.dll is not loadable: `C:\Program Files (x86)\Pidgin\plugins\perl.dll': The specified module could not be found. ตอนนี้โมดูลอยู่ที่นั่น: ดังนั้นฉันสมมติว่ามีสถาปัตยกรรมไม่ตรงกันหรือโมดูลเสียหายอย่างสมบูรณ์ ฉันจะแก้ไขสิ่งนี้ได้อย่างไร perl.dllโมดูล Perl ทั่วไปคืออะไร?

windows-7  windows  perl  dll  pidgin 

การตั้งค่าไร้สายของฉันล้มเหลววันละหลายครั้งการรีสตาร์ทตัวจัดการเครือข่ายของ gnome จะช่วยได้ ฉันต้องการทำให้เป็นแบบอัตโนมัติและแฮ็กข้อความต่อไปนี้: #!/usr/bin/perl use strict; use warnings; my $result = system "ping -c1 -W1 192.168.1.1"; if ($result != 0) { print "No connectivity. Action required...\n"; my $pid = `pgrep nm-applet`; if ($pid) { print "Killing current nm-applet instance $pid\n"; system "kill $pid"; } print "Starting nm-applet..."; exec "nm-applet" …

linux  cron  perl  networkmanager 

ฉันกำลังคัดลอกไฟล์จากไฟล์หนึ่งไปยังอีก ฉันต้องการตรวจสอบว่าไฟล์ต้นฉบับนั้นมีอยู่หรือไม่ซ้ำทุก ๆ 10 วินาที ฉันจะตรวจสอบในระหว่างการคัดลอกได้อย่างไร

-1 perl  file-transfer 

ฉันมี Regex ต่อไปนี้ใน PERL ซึ่งฉันจำเป็นต้องแปลงเป็น PHP if($line =~ m/[<]div class="row.* id="(vm_[0-9]{8,9})"[>]/i){ } ฉันมี PHP ต่อไปนี้เพื่อให้ตรงกับในขณะนี้ แต่ฉันไม่ได้ผลลัพธ์เดียวกัน: preg_grep('/[<]div class="row(.*) id="(vm_[0-9]{8,9})"[>]/', $lines); ใครสามารถบอกฉันว่าสิ่งที่ฉันมีเหมือนกันหรือถ้าฉันเข้าใจผิด?

-1 php  regex  perl