日韩无码专区无码一级三级片|91人人爱网站中日韩无码电影|厨房大战丰满熟妇|AV高清无码在线免费观看|另类AV日韩少妇熟女|中文日本大黄一级黄色片|色情在线视频免费|亚洲成人特黄a片|黄片wwwav色图欧美|欧亚乱色一区二区三区

RELATEED CONSULTING
相關(guān)咨詢
選擇下列產(chǎn)品馬上在線溝通
服務(wù)時間：8:30-17:00
你可能遇到了下面的問題
關(guān)閉右側(cè)工具欄

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營銷解決方案
Perleval函數(shù)的兩種使用方式

本文和大家重點(diǎn)討論一下Perl Perl eval函數(shù)的概念，Perl eval函數(shù)可以看作是Perl虛擬機(jī)，它的參數(shù)就是一段Perl代碼，并且利用’Perldoc–feval’可以獲取Perl eval函數(shù)使用幫助。具體內(nèi)容請看本文詳細(xì)介紹。

站在用戶的角度思考問題，與客戶深入溝通，找到峨邊彝族網(wǎng)站設(shè)計(jì)與峨邊彝族網(wǎng)站推廣的解決方案，憑借多年的經(jīng)驗(yàn)，讓設(shè)計(jì)與互聯(lián)網(wǎng)技術(shù)結(jié)合，創(chuàng)造個性化、用戶體驗(yàn)好的作品，建站類型包括：網(wǎng)站制作、網(wǎng)站建設(shè)、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣、域名與空間、虛擬主機(jī)、企業(yè)郵箱。業(yè)務(wù)覆蓋峨邊彝族地區(qū)。

Perl eval函數(shù)探討

Perl作為一種腳本語言可以實(shí)時地生成和執(zhí)行代碼。這種特性可以把代碼的編譯推遲到運(yùn)行時，所以又稱為“動態(tài)代碼”。另外，Perl也如Java、C++一樣提供了異常處理機(jī)制。本文將初步探討Perl中實(shí)現(xiàn)動態(tài)代碼和異常處理機(jī)制的函數(shù)：eval。如有錯誤不足，歡迎討論和批評指正。

Perl eval函數(shù)可以看作是Perl虛擬機(jī)，它的參數(shù)就是一段Perl代碼。利用’Perldoc–feval’可以獲取Perl eval函數(shù)使用幫助，其中介紹了它的兩種使用方式：

Perl eval函數(shù)之levalEXPR
EXPR是一個的表達(dá)式，例如：
eval"print$a";
eval'print$a'.',$b';
eval1+3;
eval'print'.'$a+$b,"\n"';
eval$command;#$command=‘print“helloPerl”’
eval$ARGV[0];
在執(zhí)行時，Perl解釋器會首先解析表達(dá)式的值，然后將表達(dá)式值作為一條Perl語句插入當(dāng)前執(zhí)行上下文。所以，新生成的語句與eval語句本身具有相同的上下文環(huán)境。這種方式中，每次執(zhí)行eval語句，表達(dá)式都會被解析。所以，如果evalEXPR如果出現(xiàn)在循環(huán)中，表達(dá)式可能會被解析多次。eval的這種方式使得Perl腳本程序能實(shí)時生成和執(zhí)行代碼，從而實(shí)現(xiàn)了“動態(tài)代碼”。

Perl eval函數(shù)之levalBLOCK
BLOCK是一個代碼塊，例如：
eval{print$a};
eval{$a=1,$b=2,$c=$a+$b};
與第一種方式不同，BLOCK只會被解析一次，然后整個插入當(dāng)前Perl eval函數(shù)所在的執(zhí)行上下文。由于解析上的性能的優(yōu)勢，以及可以在編譯時進(jìn)行代碼語法檢查，這種方式通常被作為Perl用來為一段代碼提供異常捕捉機(jī)制，雖然前一種方式也可以。

按幫助的名稱，稱eval的參數(shù)程序?yàn)椤靶〕绦颉?mini-program)。在兩種方式中，Perl eval函數(shù)的返回值都是小程序的最后一條語句的值，如果遇到return語句，與子例程相同。
Script1: 

 
 
 
    
  
  
  
  1. #!/usr/bin/Perl-w  
    2. 
  
  
  
  2.  
    3. 
  
  
  
  3. push(@program,'$i=1;');  
    4. 
  
  
  
  4. push(@program,'$i=3;$j=2;$k=$i+$j');  
    5. 
  
  
  
  5. push(@program,'$i=3;return24;$k=$i+$j');  
    6. 
  
  
  
  6.  
    7. 
  
  
  
  7. foreach$exp(@program)  
    8. 
  
  
  
  8. {  
    9. 
  
  
  
  9. $rtn=eval($exp);  
    10. 
  
  
  
  10. print$rtn,"\n";  
    11. 
  
  
  
  11. }  
    12. 
  
  
  
  12. Output:  
    13. 
  
  
  
  13. 1  
    14. 
  
  
  
  14. 5  
    15. 
  
  
  
  15. 24 
    16.

 如果小程序中有語法錯誤、運(yùn)行時錯誤遇到die語句，eval將返回undef。錯誤碼被保存在$@中。
Script2: 

 
 
 
    
  
  
  
  1. #!/usr/bin/Perl-w  
    2. 
  
  
  
  2.  
    3. 
  
  
  
  3. push(@program,'$i=3;die"errormessage";$k=$i+$j');  
    4. 
  
  
  
  4.  
    5. 
  
  
  
  5. foreach$exp(@program)  
    6. 
  
  
  
  6. {  
    7. 
  
  
  
  7. $rtn=eval($exp);  
    8. 
  
  
  
  8. if(!defined($rtn))  
    9. 
  
  
  
  9. {  
    10. 
  
  
  
  10. print"Exception:",$@,"\n";  
    11. 
  
  
  
  11. }  
    12. 
  
  
  
  12. else  
    13. 
  
  
  
  13. {  
    14. 
  
  
  
  14. print$rtn,"\n";  
    15. 
  
  
  
  15. }  
    16. 
  
  
  
  16. };  
    17.

 Output:
Exception:errormessageat(eval1)line1.

Script3: 

 
 
 
    
  
  
  
  1. #!/usr/bin/Perl-w  
    2. 
  
  
  
  2.  
    3. 
  
  
  
  3. #arun-timeerror  
    4. 
  
  
  
  4. eval'$answer=';#sets$@  
    5. 
  
  
  
  5. warn$@if$@;  
    6. 
  
  
  
  6.  
    7. 
  
  
  
  7. Output:  
    8. 
  
  
  
  8. syntaxerrorat(eval1)line2,atEOF  
    9.

標(biāo)題名稱：Perleval函數(shù)的兩種使用方式
鏈接地址：http://m.5511xx.com/article/ccoceoi.html