討論區快速選單
知識庫快速選單
網路投保旅行平安險 傑米的攝影旅遊筆記 政府補助!學嵌入式+物聯網
[ 回上頁 ] [ 討論區發言規則 ]
想請教一下有關Perl正規表示式的問題
更改我的閱讀文章字型大小
作者 : ixa(IXA)
[ 貼文 13 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 1 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2011/11/25 上午 02:49:37
想請教一下以下這個Perl程式出了什麼問題

#!/usr/bin/perl

my $answer = "mo*r";
while(1){
   if((my $patten=)=~/$answer/){
     print"*match*\n";
   }else {
     print"*not match*\n";
   }
};

而所得到的結果是:
syntax error at ch6_3.pl line 5, near "=)"
syntax error at ch6_3.pl line 7, near "}else"
Execution of ch6_3.pl aborted due to compilation errors.
作者 : ixa(IXA)
[ 貼文 13 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 1 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2011/11/25 上午 03:06:40
那我該怎麼辦??
作者 : jason680(Jsn) 貼文超過200則
[ 貼文 209 | 人氣 1 | 評價 810 | 評價/貼文 3.88 | 送出評價 4 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2011/11/25 上午 11:58:19
if((my $patten=)=~/$answer/){


(在網頁中)應該有大於,小於符號不見了....
(my $patten=<>)
 板主 : 徵求中
 > Perl - 討論區
 - 最近熱門問答精華集
 - 全部歷史問答精華集
 - Perl - 知識庫
  ■ 全站最新Post列表
  ■ 我的文章收藏
  ■ 我最愛的作者
  ■ 全站文章收藏排行榜
  ■ 全站最愛作者排行榜
  ■  月熱門主題
  ■  季熱門主題
  ■  熱門主題Top 20
  ■  本區Post排行榜
  ■  本區評價排行榜
  ■  全站專家名人榜
  ■  全站Post排行榜
  ■  全站評價排行榜
  ■  全站人氣排行榜
 請輸入關鍵字 
  開始搜尋
 
Top 10
評價排行
Perl
1 HKLN.net 2850 
2 Benson 480 
3 Jsn 470 
4 pail 240 
5 可愛處理器 170 
6 菜鳥小德 160 
7 mrhsuap 160 
8 kalua 120 
9 110 
10 jackkon 100 
Perl
  專家等級 評價  
  一代宗師 10000  
  曠世奇才 5000  
  頂尖高手 3000  
  卓越專家 1500  
  優秀好手 750  
Microsoft Internet Explorer 6.0. Screen 1024x768 pixel. High Color (16 bit).
2000-2018 程式設計俱樂部 http://www.programmer-club.com.tw/
0.03125