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

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

新聞中心

這里有您想知道的互聯(lián)網(wǎng)營(yíng)銷解決方案
Perl子程序參數(shù)問題解答

本文和大家重點(diǎn)討論一下Perl子程序參數(shù)的用法,Perl子程序參數(shù)是數(shù)組或哈希表時(shí),函數(shù)中獲得這些參數(shù)值的方式和一般的標(biāo)量變量是不同的。

石門網(wǎng)站建設(shè)公司創(chuàng)新互聯(lián),石門網(wǎng)站設(shè)計(jì)制作,有大型網(wǎng)站制作公司豐富經(jīng)驗(yàn)。已為石門上千多家提供企業(yè)網(wǎng)站建設(shè)服務(wù)。企業(yè)網(wǎng)站搭建\成都外貿(mào)網(wǎng)站制作要多少錢,請(qǐng)找那個(gè)售后服務(wù)好的石門做網(wǎng)站的公司定做!

Perl子程序參數(shù)是數(shù)組或哈希表時(shí)的問題

Perl子程序參數(shù)是數(shù)組或哈希表時(shí),函數(shù)中獲得這些參數(shù)值的方式和一般的標(biāo)量變量是不同的。

Perl代碼

 
 
 
  1. #!/usr/bin/perl  
  2. usestrict;  
  3. usewarnings;  
  4.  
  5. subfunc{  
  6. print"@_\n";  
  7. }  
  8.  
  9. my$id=1;  
  10. my@info=('PHPfans','phpfans.net');  
  11. my%info=("name"=>"PHPfans","url"=>"phpfans.net");  
  12.  
  13. func($id,@info);  
  14.  
  15. [root@PHPfansperl]#perlsub.pl  
  16. 1PHPfansphpfans.net  
  17.  

 發(fā)現(xiàn)第一個(gè)參數(shù)和第二個(gè)參數(shù)合并成一個(gè)大數(shù)組了。Perl子程序參數(shù)如果是哈希表的話還會(huì)將鍵值也保存在@_數(shù)組中。問題是怎么將各個(gè)參數(shù)分出來。這里第一個(gè)是標(biāo)量變量,還可以用shift獲取,然后剩下的就是第二個(gè)參數(shù)。但如果兩個(gè)都是數(shù)組變量的話,這種方法顯然就不行。這就要用到引用的方式傳遞。引用和C的指針是一致的,就是某值的地址。Perl的引用和PHP又不太相同,Perl是用反斜線(\)操作符

Perl代碼

 
 
 
  1. #!/usr/bin/perl  
  2. usestrict;  
  3. usewarnings;  
  4.  
  5. subfunc{  
  6. print"@_\n";  
  7. }  
  8.  
  9. my$id=1;  
  10. my@info=('PHPfans','phpfans.net');  
  11. my%info=("name"=>"PHPfans","url"=>"phpfans.net");  
  12.  
  13. func($id,\@info);  
  14.  
  15. [root@PHPfansperl]#perlsub.pl  
  16. 1ARRAY(0x81f0e24)  
  17.  

 現(xiàn)在是要從該引用得倒改數(shù)組的值。如果$pointer的值為一個(gè)數(shù)組的指針,則通過形式@$pointer來訪問數(shù)組中的元素。類似的,哈希表為%$pointer。

Perl代碼

 
 
 
  1. #!/usr/bin/perl  
  2. usestrict;  
  3. usewarnings;  
  4.  
  5. subfunc{  
  6. my($id,$info)=@_;  
  7. my@info=@$info;  
  8. print"@info\n";  
  9. }  
  10.  
  11. my$id=1;  
  12. my@info=('PHPfans','phpfans.net');  
  13. my%info=("name"=>"PHPfans","url"=>"phpfans.net");  
  14.  
  15. func($id,\@info);  
  16.  
  17. [root@PHPfansperl]#perlsub.pl  
  18. PHPfansphpfans.net  

 【編輯推薦】

  1. 全面認(rèn)識(shí)Perl子程序用法
  2. Perl模式匹配參數(shù)使用詳解
  3. Perl命令行參數(shù)應(yīng)用指導(dǎo)
  4. 學(xué)習(xí)筆記 Perl split函數(shù)用法指導(dǎo)
  5. Perl多進(jìn)程及其和多線程的關(guān)系解析

新聞標(biāo)題:Perl子程序參數(shù)問題解答
文章源于:http://www.5511xx.com/article/dhhjcjd.html