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

เมื่อฉันวิ่งperlฉันได้รับคำเตือน: perl: คำเตือน: การตั้งค่าภาษาล้มเหลว perl: คำเตือน: โปรดตรวจสอบว่าการตั้งค่าภาษาของคุณ: LANGUAGE = (ไม่ได้ตั้งค่า) LC_ALL = (ไม่ได้ตั้งค่า) LANG = "en_US.UTF-8" ได้รับการสนับสนุนและติดตั้งบนระบบของคุณ perl: คำเตือน: การย้อนกลับไปยังโลแคลมาตรฐาน ("C") ฉันจะแก้ไขได้อย่างไร

596 perl  locale 

ฉันสงสัยว่าทำไมโซลูชั่นที่ทันสมัยที่สุดที่สร้างโดยใช้ Perl ไม่เปิดใช้งานUTF-8โดยค่าเริ่มต้น ฉันเข้าใจว่ามีปัญหาแบบดั้งเดิมสำหรับสคริปต์ Perl หลักซึ่งอาจทำให้เกิดปัญหา แต่จากมุมมองของฉันใน 21 เซนต์ศตวรรษโครงการขนาดใหญ่ใหม่ (หรือโครงการที่มีมุมมองขนาดใหญ่) ควรทำให้ซอฟต์แวร์ UTF-8 ของพวกเขาพิสูจน์จากรอยขีดข่วน ยังฉันไม่เห็นมันเกิดขึ้น ยกตัวอย่างเช่นMooseช่วยให้เข้มงวดและคำเตือน แต่ไม่Unicode โมเดิร์น :: Perlช่วยลดสำเร็จรูปสำเร็จรูป แต่ไม่มี UTF-8 จัดการ ทำไม? มีเหตุผลบางอย่างที่จะหลีกเลี่ยง UTF-8 ในโครงการ Perl ที่ทันสมัยในปี 2011 หรือไม่? ความคิดเห็น @tchrist ยาวเกินไปดังนั้นฉันจึงเพิ่มที่นี่ ดูเหมือนว่าฉันไม่ได้ทำให้ตัวเองชัดเจน ให้ฉันลองเพิ่มบางสิ่ง tchristและฉันเห็นว่าสถานการณ์ค่อนข้างคล้ายคลึงกัน แต่ข้อสรุปของเรานั้นสมบูรณ์ในทางตรงกันข้าม ฉันเห็นด้วยสถานการณ์ของ Unicode นั้นซับซ้อน แต่นี่เป็นเหตุผลว่าทำไมเรา (ผู้ใช้ Perl และ coders) ต้องการเลเยอร์ (หรือ pragma) ซึ่งทำให้การจัดการ UTF-8 …

557 perl  unicode  utf-8 

ฉันใช้ActivePerl 5.14.2 32 บิตของ ActiveState ใน Windows 7 ฉันต้องการยุ่งกับ Git pre-commit hook เพื่อตรวจสอบโปรแกรมที่กำลังเช็คอินพร้อมข้อผิดพลาดทางไวยากรณ์ (อย่างใดฉันก็สามารถที่จะทำเช่นนั้นมุ่งมั่นที่ไม่ดี.) ดังนั้นเป็นโปรแกรมทดสอบฉัน jotted แบบสุ่มนี้: use strict; use warnings; Syntax error! exit 0; อย่างไรก็ตามมันรวบรวมและดำเนินการโดยไม่มีคำเตือนและ errorlevel เป็นศูนย์เมื่อออก ไวยากรณ์ที่ถูกต้องนี้เป็นอย่างไร

489 perl 

ฉันพยายามที่จะใช้breakคำสั่งในforวง แต่เนื่องจากฉันยังใช้หมวดย่อยอย่างเข้มงวดในรหัส Perl ของฉันฉันได้รับข้อผิดพลาดว่า: Bareword "break" ไม่ได้รับอนุญาตในขณะที่ใช้ "subs subs" อย่างเข้มงวดที่. /final.pl บรรทัดที่ 154 มีวิธีแก้ปัญหาสำหรับสิ่งนี้ (นอกเหนือจากการปิดใช้งานหมวดย่อยที่เข้มงวด)? รหัสของฉันมีรูปแบบดังนี้: for my $entry (@array){ if ($string eq "text"){ break; } }

295 perl  loops  break  strict 

บางครั้งฉันต้องการจับคู่ช่องว่าง แต่ไม่ขึ้นบรรทัดใหม่ จนถึงตอนนี้ฉันก็หันไป[ \t]ใช้ มีวิธีที่น่าอึดอัดใจน้อยลงหรือไม่?

277 regex  perl 

ฉันจะเริ่มต้นคอนโซลการโต้ตอบสำหรับ Perl คล้ายกับirbคำสั่งสำหรับ Ruby หรือpythonPython ได้อย่างไร

264 perl  console  interactive  read-eval-print-loop 

ตามที่เป็นอยู่ในปัจจุบันคำถามนี้ไม่เหมาะสำหรับรูปแบบคำถาม & คำตอบของเรา เราคาดหวังคำตอบที่จะได้รับการสนับสนุนจากข้อเท็จจริงการอ้างอิงหรือความเชี่ยวชาญ แต่คำถามนี้มีแนวโน้มที่จะเรียกร้องการอภิปรายการโต้แย้งการหยั่งเสียงหรือการอภิปรายเพิ่มเติม หากคุณรู้สึกว่าคำถามนี้สามารถปรับปรุงและเปิดใหม่ได้โปรดไปที่ศูนย์ช่วยเหลือเพื่อขอคำแนะนำ ปิดให้บริการใน8 ปีที่ผ่านมา แค่อยากรู้ว่าอะไรคือความแตกต่างที่สำคัญระหว่างพวกเขา และพลังของแต่ละภาษา (ซึ่งจะดีกว่าการใช้งาน) แก้ไข:ไม่ใช่ "vs. " ชอบหัวข้อเพียงแค่ข้อมูล

253 python  perl  sed  awk  language-comparisons 

ฉันดูเหมือนจะเจอวิธีที่แตกต่างกันหลายวิธีในการหาขนาดของอาร์เรย์ ความแตกต่างระหว่างสามวิธีนี้คืออะไร? my @arr = (2); print scalar @arr; # First way to print array size print $#arr; # Second way to print array size my $arrSize = @arr; print $arrSize; # Third way to print array size

243 perl 

ฉันพยายามหาวิธีการตรวจสอบการมีอยู่ของค่าในอาร์เรย์โดยไม่ต้องวนซ้ำผ่านอาร์เรย์ ฉันกำลังอ่านไฟล์เพื่อหาพารามิเตอร์ ฉันมีรายการพารามิเตอร์จำนวนมากฉันไม่ต้องการจัดการ @badparamsฉันวางพารามิเตอร์ที่ไม่พึงประสงค์เหล่านี้ในอาร์เรย์ ฉันต้องการอ่านพารามิเตอร์ใหม่และหากไม่มีอยู่@badparamsให้ประมวลผล หากไม่มีอยู่@badparamsให้ไปที่การอ่านถัดไป

239 perl  arrays  comparison 

มีใครช่วยได้บ้าง ใน Perl ความแตกต่างระหว่าง: exec "command"; และ system("command"); และ print `command`; มีวิธีอื่นในการรันคำสั่งเชลล์ด้วยหรือไม่

237 perl 

มี regex เพื่อจับคู่ "ตัวละครทั้งหมดรวมถึงการขึ้นบรรทัดใหม่"? ตัวอย่างเช่นใน regex ด้านล่างไม่มีผลลัพธ์จาก$2เพราะ(.+?)ไม่รวมบรรทัดใหม่เมื่อจับคู่ $string = "START Curabitur mollis, dolor ut rutrum consequat, arcu nisl ultrices diam, adipiscing aliquam ipsum metus id velit. Aenean vestibulum gravida felis, quis bibendum nisl euismod ut. Nunc at orci sed quam pharetra congue. Nulla a justo vitae diam eleifend dictum. Maecenas …

224 regex  perl 

ฉันเหนื่อย: $var = false; $var = FALSE; $var = False; ไม่มีงานเหล่านี้ ฉันได้รับข้อความแสดงข้อผิดพลาด Bareword "false" ไม่ได้รับอนุญาตในขณะที่ใช้ "subs subs" อย่างเข้มงวด

220 perl  boolean 

มีวิธีใดบ้างที่จะส่งผลต่อการค้นหาโมดูล Perl หรือวิธีสร้าง @INC ของ Perl เป็นอย่างไร ดังที่เราทราบPerl ใช้@INCอาร์เรย์ที่มีชื่อไดเรกทอรีเพื่อกำหนดว่าจะค้นหาไฟล์โมดูล Perlได้ที่ไหน ดูเหมือนจะไม่มีโพสต์ประเภทคำถามที่พบบ่อย "@ INC" ที่ครอบคลุมใน StackOverflow ดังนั้นคำถามนี้มีจุดมุ่งหมายเดียว

199 perl  perl-module 

ฉันมีไฟล์ที่มีหลายพันตัวเลขโดยแต่ละไฟล์เป็นของตัวเอง: 34 42 11 6 2 99 ... ฉันต้องการเขียนสคริปต์ซึ่งจะพิมพ์ผลรวมของตัวเลขทั้งหมดในไฟล์ ฉันมีวิธีแก้ปัญหาแล้ว แต่มันก็ไม่ได้มีประสิทธิภาพมากนัก (ใช้เวลาหลายนาทีในการทำงาน) ฉันกำลังมองหาโซลูชันที่มีประสิทธิภาพมากขึ้น ข้อเสนอแนะใด ๆ

195 linux  perl  bash  shell  awk 

ฉันได้รับข้อผิดพลาดนี้: Can't locate Foo.pm in @INC มีวิธีที่ง่ายกว่าในการติดตั้งกว่าการดาวน์โหลด, ไม่เปิดเผย, การสร้างและอื่น ๆ ?

192 perl  install  cpan