[PERL] 命令列傳入參數argv @新精讚

文章推薦指數: 80 %
投票人數:10人

Perl 的外部傳參,是$ARGV[0]、$ARGV[1]、$ARGV[2]..... 現在日期2022/10/23星期日 Togglenavigation 現在日期2022/10/23星期日 最新文章[札記]2022.10~12月札記 最新消息開始發表有用的蚊蟑和黴體 數位休閒動漫影音遊戲愉樂網路和服務APACHEMYSQL/Mariadb電腦網路資訊網路協定/設定作業系統WindowsCentosLINUXFreebsdMACIOSunix-like應用其他OS前端程設HTML/CSSJquery/JSFlash/繪圖後端程設PHPopenCV+PythonJAVAPERLC#作者廢言作者碎碎念作者吱吱叫作者喃喃語維修記錄經濟學視野 主題 標準 時間線 更多發現 [無邊框] 精讚新精讚首頁 後端程設PERL [PERL]命令列傳入參數argv 7835 [PERL]命令列傳入參數argv “Perl的外部傳參,是$ARGV[0]、$ARGV[1]、$ARGV[2].....„ 分享此文連結//n.sfs.tw/10675 分享連結[PERL]命令列傳入參數argv@新精讚 (文章歡迎轉載,務必尊重版權註明連結來源) 2019-10-2509:51:07最後編修 2017-01-2409:22:45By張○○   自動目錄 Perl的外部傳參判斷傳參是否存在的方法 Perl的外部傳參 PERL若在命令列中有代入參數的話,可以直接用陣列@ARGV來取用,這裡的ARGV都得大寫 例如t.pl #!/usr/bin/perl-w print"@ARGV"; print"\n".$ARGV[1];  #第2個傳參 執行 #./t.pl01234 01234 1 個別參數分別是$ARGV[0]、$ARGV[1]、$ARGV[2]..... 判斷傳參是否存在的方法 如果該參數不存在,會出現這樣的錯誤: Useofuninitializedvalue... 所以取用前得先判斷該參數是否存在 if( !$ARGV[0]) {die "請輸入第一個參數\r\n";} #請注意'!'因為,ARGV[0]並非undef,而是無初始值。

所以寫成下面這樣都是錯的: if( undef($ARGV[0])){...} X if($ARGV[0] eq"" ){...}X if($ARGV[0] =="" ){...}X if($ARGV[0] ==undef ){...}X 只有這樣是正確的 if( !$ARGV[0]) {...}O 和PHP有點不一樣的在於要取得執行程式本身(含你指定的路徑),只要使用特殊變數$0即可:一個錢號和數字0,以上例而言: print$0; #./t.pl 編修原文2009-10-2113:39:42 END 你可能感興趣的文章 [PERL]03-條件式判斷perl的條件式判斷 [PERL]16-字串取代和置換Perl字串比對及置換 [PERL]07-陣列#1--基本perl的陣列 [PERL]17-參照PERL的參照,就是指標 自行撰寫syslogserver建立資訊安全控管中心#4--過濾條件設定利用PERL將syslog收攏到資料庫的程式,過濾條件設定 PERL的真值和假值(布林值)整理Perl中的判斷真假的結果 我有話要說 >> 姓名* EMAIL* 留言內容* 我是人類* 限制:留言最高字數1000字。

限制:未登入訪客,每則留言間隔需超過10分鐘,每日最多5則留言。

訪客留言 [無留言] 隨機好文 HPSAS硬碟leds燈號說明HPSAS硬碟leds燈號(hpg7/g6系統適用)說明 UTF-8BOM(ByteOrderMark)的問題在MichaelKaplan那看到Everycharacterhasastory#4:U+feff NETCRAFT發現你的網站及作業系統NETCRAFT可以發現你的網站及作業系統 海棉寶寶超泡杯演奏的sweetvictory章魚哥和海棉寶寶在超泡杯的演奏歌曲 在Centos7下安裝Wildfly10wildfly以前叫JBoss,2014.11.20改名叫Wildfly,起始版本是Wildfly8,現在已經出到Wil Perl的外部傳參判斷傳參是否存在的方法 到最頂端 到中間 到最底端



請為這篇文章評分?