ต้นคริสต์มาสเคลื่อนไหว: นำคริสต์มาสมาสู่คอนโซล Linux ของคุณ

ต้นคริสต์มาสคอนโซลลินุกซ์

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

ขอบคุณ cyberciti.biz และ Vivek Gite สำหรับรหัสนี้คุณต้องมี ติดตั้ง Perl ในระบบของเราหากคุณมีอยู่แล้วเราสามารถติดตั้ง Acme :: POE :: Tree ในการทำเช่นนี้เราจะใช้โมดูล CPAN (Comprehensive Perl Archive Network) และเริ่มต้นด้วยสิทธิพิเศษเราเขียนบรรทัดคำสั่งง่ายๆ:

perl -MCPAN -e 'install Acme::POE::Tree'

เมื่อเรามีสิ่งนี้เราก็ทำได้ ดูต้นคริสต์มาสในเปลือกหอย ด้วยคำสั่งง่ายๆ:

perl -MAcme::POE::Tree -e 'Acme::POE::Tree->new()->run()'

หากสิ่งที่คุณต้องการคือการปรับแต่งต้นไม้นี้คุณสามารถแก้ไขซอร์สโค้ดของสคริปต์ Perl และบันทึกลงในไฟล์ข้อความ (เช่น christmas.pl) ด้วยเนื้อหา:

#!/usr/bin/perl

use Acme::POE::Tree;

my $tree = Acme::POE::Tree->new(

{

star_delay =>1.5, #brillo durante 1.5segundos

light_delay => 2, #Centelleo de las luces por 2 segundos

run_for => 10, #Salir automáticamente tras 10 segundos de muestra

}

);

$tree->run();


แสดงความคิดเห็นของคุณ

อีเมล์ของคุณจะไม่ถูกเผยแพร่ ช่องที่ต้องการถูกทำเครื่องหมายด้วย *

*

*

  1. รับผิดชอบข้อมูล: AB Internet Networks 2008 SL
  2. วัตถุประสงค์ของข้อมูล: ควบคุมสแปมการจัดการความคิดเห็น
  3. ถูกต้องตามกฎหมาย: ความยินยอมของคุณ
  4. การสื่อสารข้อมูล: ข้อมูลจะไม่ถูกสื่อสารไปยังบุคคลที่สามยกเว้นตามข้อผูกพันทางกฎหมาย
  5. การจัดเก็บข้อมูล: ฐานข้อมูลที่โฮสต์โดย Occentus Networks (EU)
  6. สิทธิ์: คุณสามารถ จำกัด กู้คืนและลบข้อมูลของคุณได้ตลอดเวลา

  1.   Matias dijo

    เราอยู่ปีไหน? 1995? ฮ่า ๆ ๆ นั่นคือสาเหตุที่ linux ไม่เคยเป็นเหมือนคนทั่วไป

    1.    ผู้มีชัย dijo

      คิว ?? ฉันจะบอกคุณในกรณีที่คุณไม่รู้เทอร์มินัลเป็นสิ่งที่ขาดไม่ได้อยากจะทำรายละเอียดประเภทนี้เป็นงานอดิเรกคือความบันเทิงแม้ว่าสำหรับคุณมันจะโง่ แต่ความคิดเห็นของคุณก็ไร้ความหมาย;)

      อาศิรพจน์

  2.   จิมมี่โอลาโน dijo

    สนใจ CPAN นี้: «อย่าสร้างล้อใหม่»

    ฉันติดตั้ง perl 5 แล้วและมันไม่ทำงานเนื่องจากไม่มี "Curses.pm" การอ้างอิงที่ไม่ได้รับแม้ว่าฉันจะเรียกใช้ CPAN และกำหนดค่าด้วยมิเรอร์ที่ใกล้เคียงที่สุดโดยอัตโนมัติ

    อย่าหยุดสนใจบางสิ่งที่ดูเหมือน "งี่เง่า" และแม้แต่สมัยโบราณก็สามารถสอนบทเรียนที่น่าสนใจให้เราได้โดยส่วนตัวแล้วสำหรับฉันแล้วภาษาที่ค่อนข้าง "แปลก" แต่ฉันไม่รู้ว่าพวกเขามีบางสิ่งที่ "รวมศูนย์" สำหรับโปรแกรมของพวกเขา