討論區快速選單
知識庫快速選單
網路投保旅行平安險 政府補助!學嵌入式+物聯網 傑米的攝影旅遊筆記
[ 回上頁 ] [ 討論區發言規則 ]
perl 初學者問題
更改我的閱讀文章字型大小
作者 : synnex89853(sssssaaaa)
[ 貼文 9 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 4 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/8/16 下午 10:24:40
最近剛碰perl
需要用到一個
矩陣 需要找出遞加
如果沒有遞加需要抓出來的題目

例如
1
2
3
4
3
2
1

就必須抓出3 2 1 這三個數字
不知道該怎麼寫
希望有人可以指點一下嗎?
作者 : kunkun(阿昆)
[ 貼文 9 | 人氣 0 | 評價 80 | 評價/貼文 8.89 | 送出評價 0 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
主題發起人synnex89853註記此篇回應為很有道理 2012/8/17 上午 02:09:52
小弟也算是新手
這樣寫不知道對不對 供你參考^^
@array=(1,2,3,4,3,2,1);
for($i=0;$i<$#array;$i++)
{
if($array[$i]<$array[$i+1])
{
next;
}
else
{
print "$array[$i+1]\n";
}
}
作者 : synnex89853(sssssaaaa)
[ 貼文 9 | 人氣 0 | 評價 0 | 評價/貼文 0 | 送出評價 4 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/8/17 上午 10:33:48
那假如要從 TXT 檔中拉出來 需要怎麼調整呢?
作者 : kunkun(阿昆)
[ 貼文 9 | 人氣 0 | 評價 80 | 評價/貼文 8.89 | 送出評價 0 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
主題發起人synnex89853註記此篇回應為最佳解答 2012/8/17 上午 11:37:48
我在txt檔案裡面把原本上面@array裡的值全寫入(一行一個數字)
再來Perl中程式最上面加上以下這段
open FILE,"file.txt"; #打開一個為file.txt的檔案
while(<FILE>)
{
chomp($_);
push @array,$_;
}

這樣就可以了!
建議你可以去上網找一些Perl的教學網站從頭看起(這些都是基本在看的時候就會學到的)
作者 : kunkun(阿昆)
[ 貼文 9 | 人氣 0 | 評價 80 | 評價/貼文 8.89 | 送出評價 0 次 ] 
[ 給個讚 ]  [ 給個讚 ]  [ 回應本文 ]  [ 發表新文 ]  [ 回上頁 ] [ 回討論區列表 ] [ 回知識入口 ]
2012/8/17 上午 11:46:44
推薦你一些教學網站 我Perl目前也才剛學1個多月 這些都看過(當然不只以下這些)
相信看了後基礎會紮實不少^^
http://easun.org/perl/perl-toc/
http://neural.cs.nthu.edu.tw/jang/books/perl/
http://ind.ntou.edu.tw/~dada/cgi/Perlsynx.htm
 板主 : 徵求中
 > 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.046875