亚洲av成人无遮挡网站在线观看,少妇性bbb搡bbb爽爽爽,亚洲av日韩精品久久久久久,兔费看少妇性l交大片免费,无码少妇一区二区三区

Chinaunix

標題: Perl CGI 寫文件嚴重靈異了,求助ing [打印本頁]

作者: dove-young    時間: 2010-11-06 23:50
標題: Perl CGI 寫文件嚴重靈異了,求助ing
代碼是這樣的
  1.     open (SPRINT, ">${project}/data/sprint_plan.csv" ) || die "cannot write to file ";
  2.     $num = 0;
  3.     foreach (@start_date) {
  4. #        print "end_date = $_ <br>";
  5. #        print join "|", $start_date[$num], $end_date[$num], $num+1, "<br>";

  6.         print "start date = $_ <br>";
  7.         $end = $end_date[$num];
  8.        
  9. #        $sprint_plan = join ",", $num+1, $_, $end_date[$num] ;
  10. #        $sprint_plan = join "|",  $_, $num++ ;
  11.         print "end date = $end<br>";
  12.         print SPRINT "$_ | ";
  13.         print SPRINT "$end | ";
  14.         print SPRINT $num++, "\n"
  15. #        print SPRINT "$_|$start|<br>\n";
  16. #        print SPRINT "----------------\n";
  17. #        $num++;
  18.     }
  19.     close (SPRINT);
復制代碼
執(zhí)行之后頁面輸出這樣的信息
  1. start date = 2010-03-04
  2. end date = 2010-03-14
  3. start date = 2010-03-15
  4. end date = 2010-03-25
  5. start date = 2010-03-26
  6. end date = 2010-04-05
  7. start date = 2010-04-06
  8. end date = 2010-04-18
  9. start date = 2010-04-19
  10. end date = 2010-04-27
  11. start date = 2010-04-28
  12. end date = 2010-05-08
  13. start date = 2010-05-09
  14. end date = 2010-05-19
  15. start date = 2010-05-20
  16. end date = 2010-05-30
  17. start date = 2010-05-31
  18. end date = 2010-06-10
  19. start date = 2010-06-11
  20. end date =
復制代碼
但靈異的是文件始終是這樣的結果
  1. -bash-3.1# cat /var/www/cgi-bin/new/data/sprint_plan.csv
  2. | 0
  3. | 1
  4. | 2
  5. | 3
  6. | 4
  7. | 5
  8. | 6
  9. | 7
  10. | 8
  11. 2010-06-11 |  | 9
  12. -bash-3.1#
復制代碼
靈異的是,如果把這一行注釋掉
  1. #        print SPRINT "$end | ";
復制代碼
, 就會成這樣的結果
  1. -bash-3.1# cat /var/www/cgi-bin/new/data/sprint_plan.csv
  2. 2010-03-04 | 0
  3. 2010-03-15 | 1
  4. 2010-03-26 | 2
  5. 2010-04-06 | 3
  6. 2010-04-19 | 4
  7. 2010-04-28 | 5
  8. 2010-05-09 | 6
  9. 2010-05-20 | 7
  10. 2010-05-31 | 8
  11. 2010-06-11 | 9
  12. -bash-3.1#
復制代碼

作者: dove-young    時間: 2010-11-06 23:53
如果把 這一行換成其他任何變量,都能成功寫入文件
  1. #        print SPRINT "$end | ";
復制代碼
換成
  1. #        print SPRINT "$start | ";
復制代碼
,就能成功寫入
  1. -bash-3.1# cat /var/www/cgi-bin/new/data/sprint_plan.csv
  2. 2010-03-04 | 2010-03-04 | 0
  3. 2010-03-15 | 2010-03-04 | 1
  4. 2010-03-26 | 2010-03-04 | 2
  5. 2010-04-06 | 2010-03-04 | 3
  6. 2010-04-19 | 2010-03-04 | 4
  7. 2010-04-28 | 2010-03-04 | 5
  8. 2010-05-09 | 2010-03-04 | 6
  9. 2010-05-20 | 2010-03-04 | 7
  10. 2010-05-31 | 2010-03-04 | 8
  11. 2010-06-11 | 2010-03-04 | 9
  12. -bash-3.1#
復制代碼

作者: dove-young    時間: 2010-11-06 23:59
看起來真是相當奇怪。 print $end 輸出到 STDOUT 沒任何問題,可是為什么就是寫不到文件呢? 而且還是只要包括了他, $start_date 也寫不進去了
作者: zhlong8    時間: 2010-11-07 00:20
本帖最后由 zhlong8 于 2010-11-07 00:22 編輯

無法重現(xiàn)你的錯誤

copy的你的代碼,加了點數(shù)據(jù),一切正常。
作者: dove-young    時間: 2010-11-07 09:26
所以說就靈異呢啊。 簡單到不能再簡單,初級到不能再初級的東西     昨天晚上搞了半晚上,還是那個錯。
作者: wxlfh    時間: 2010-11-07 09:57
會不會是換行符沒去掉呢,哈哈。
作者: dove-young    時間: 2010-11-07 11:07
會不會是換行符沒去掉呢,哈哈。
wxlfh 發(fā)表于 2010-11-07 09:57


  就是那個 <textarea> 提交上來的詭異的換行符。 但是為什么有這個換行符寫文件就寫不進去呢?

貌似是應該有詭異的折行才是?
作者: 2gua    時間: 2010-11-07 11:19
靈異?這么叫有點別扭。
作者: wxlfh    時間: 2010-11-07 19:05
本帖最后由 wxlfh 于 2010-11-09 13:46 編輯

回復 7# dove-young


    一般文本文件按行讀到內存時,都要去掉行尾的換行符。
安全點,用這樣
  1. chomp $_;    #需要去掉換行符的類似的變量,不一定是$_
復制代碼
如果確定,可以直接去掉最后一個字符,當然不是換行符也會去掉
  1. chop $_;
復制代碼

作者: iamlimeng    時間: 2010-11-08 13:58
回復 9# wxlfh


文本文件讀到內存,行尾的換行符并不會自動去掉,我以前有過同樣的教訓,靈異事件,找不到原因,所以使用chomp是個好習慣。




歡迎光臨 Chinaunix (http://72891.cn/) Powered by Discuz! X3.2