● TonHor : Open Opinion ●

 

พอดีไปเจอบทความที่ thaiopensource.org

สั่งพิชซ่าผ่าน Command-line

 

download pizza party
http://www.beigerecords.com/cory/pizza_party/download/

[root@server downloads]#tar zxvf pizza_party-0.1.b.tar.gz
[root@server downloads]#mv pizza_party-0.1.b /usr/local/src/pizza_party
[root@server downloads]#cd /usr/local/src/pizza_party
[root@server pizza_party]#./pizza_party

>> ตรงนี้และครับที่ผมจะเขียน

ถ้าเกิดมันแจ้ง error มาว่า:

• Can't locate Getopt/Mixed.pm in @INC ...

คือไม่พบ library หรือ module ของ perl ใน @INC

ที่นี้ลองใช้คำสั่ง find เพื่อหาว่ามีไฟล์ Mixed.pm หรือไม่

[root@server pizza_party]# find / -name Mixed.pm

ถ้าไม่มีให้ดาวโหลดมา :
http://ftp.linux.in.th/LHM/src/perlmod/perl-Getopt-Mixed/

[root@server downloads]#tar zxvf Getopt-Mixed-1.008.tar.gz


ลองใช้คำสั่ง :perl -V เพื่อดูว่า lib ของ perl อยู่ directory ไหน

[root@server ~]#perl -V
...
@INC:

/usr/lib/perl5/site_perl/5.8.8/i386-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.7/i386-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.6/i386-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.5/i386-linux-thread-multi
/usr/lib/perl5/site_perl/5.8.8
/usr/lib/perl5/site_perl/5.8.7
/usr/lib/perl5/site_perl/5.8.6
/usr/lib/perl5/site_perl/5.8.5
/usr/lib/perl5/site_perl
/usr/lib/perl5/vendor_perl/5.8.8/i386-linux-thread-multi
/usr/lib/perl5/vendor_perl/5.8.7/i386-linux-thread-multi
/usr/lib/perl5/vendor_perl/5.8.6/i386-linux-thread-multi
/usr/lib/perl5/vendor_perl/5.8.5/i386-linux-thread-multi
/usr/lib/perl5/vendor_perl/5.8.8
/usr/lib/perl5/vendor_perl/5.8.7
/usr/lib/perl5/vendor_perl/5.8.6
/usr/lib/perl5/vendor_perl/5.8.5
/usr/lib/perl5/vendor_perl
/usr/lib/perl5/5.8.8/i386-linux-thread-multi
/usr/lib/perl5/5.8.8

ในที่นี้ผมจะย้ายไปไว้ใน /usr/lib/perl5/5.8.8
[root@server ~]#mv /usr/local/src/downloads/Getopt-Mixed-1.008/lib/ /usr/lib/perl5/5.8.8/
[root@server ~]# cd /usr/local/src/pizza_party/

ลองรัน script ดูครับ :
[root@server pizza_party]#./pizza_party
You haven't entered a username and password
Usage: pizza_party [OPTIONS] [QUANTITY=1] [SIZE=large] [CRUST=regular]
Try `pizza_party --help' for more information.

ถ้าขึ้นแบบนี้แสดงว่า ok:
คือมันจะให้เราใส่ username & password กับ สั่งพิชซ่า

Example:

`pizza_party -pmx 2 medium regular`
สั่ง 2 medium regular crust pizzas
-p :pepperoni,-m :mushrooms,-x :extra-cheese

วิธีสั่งพิชซ่าเพิ่มเติมดูได้จาก `./pizza_party --help`

username & password สมัครได้จาก :
http://dominos.quikorder.com

ผมลองสมัครแล้วแต่มันไม่มีสำหรับประเทศไทยนะครับ ^^