免费注册 查看新帖 |

Chinaunix

  平台 论坛 博客 文库
最近访问板块 发新帖
查看: 3489 | 回复: 9
打印 上一主题 下一主题

Perl CGI 写文件严重灵异了,求助ing [复制链接]

论坛徽章:
0
跳转到指定楼层
1 [收藏(0)] [报告]
发表于 2010-11-06 23:50 |只看该作者 |倒序浏览
代码是这样的
  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);
复制代码
执行之后页面输出这样的信息
  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#
复制代码

论坛徽章:
0
2 [报告]
发表于 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#
复制代码

论坛徽章:
0
3 [报告]
发表于 2010-11-06 23:59 |只看该作者
看起来真是相当奇怪。 print $end 输出到 STDOUT 没任何问题,可是为什么就是写不到文件呢? 而且还是只要包括了他, $start_date 也写不进去了

论坛徽章:
46
15-16赛季CBA联赛之四川
日期:2018-03-27 11:59:132015年亚洲杯之沙特阿拉伯
日期:2015-04-11 17:31:45天蝎座
日期:2015-03-25 16:56:49双鱼座
日期:2015-03-25 16:56:30摩羯座
日期:2015-03-25 16:56:09巳蛇
日期:2015-03-25 16:55:30卯兔
日期:2015-03-25 16:54:29子鼠
日期:2015-03-25 16:53:59申猴
日期:2015-03-25 16:53:29寅虎
日期:2015-03-25 16:52:29羊年新春福章
日期:2015-03-25 16:51:212015亚冠之布里斯班狮吼
日期:2015-07-13 10:44:56
4 [报告]
发表于 2010-11-07 00:20 |只看该作者
本帖最后由 zhlong8 于 2010-11-07 00:22 编辑

无法重现你的错误

copy的你的代码,加了点数据,一切正常。

论坛徽章:
0
5 [报告]
发表于 2010-11-07 09:26 |只看该作者
所以说就灵异呢啊。 简单到不能再简单,初级到不能再初级的东西     昨天晚上搞了半晚上,还是那个错。

论坛徽章:
1
未羊
日期:2014-09-08 22:47:27
6 [报告]
发表于 2010-11-07 09:57 |只看该作者
会不会是换行符没去掉呢,哈哈。

论坛徽章:
0
7 [报告]
发表于 2010-11-07 11:07 |只看该作者
会不会是换行符没去掉呢,哈哈。
wxlfh 发表于 2010-11-07 09:57


  就是那个 <textarea> 提交上来的诡异的换行符。 但是为什么有这个换行符写文件就写不进去呢?

貌似是应该有诡异的折行才是啊?

论坛徽章:
0
8 [报告]
发表于 2010-11-07 11:19 |只看该作者
灵异?这么叫有点别扭。

论坛徽章:
1
未羊
日期:2014-09-08 22:47:27
9 [报告]
发表于 2010-11-07 19:05 |只看该作者
本帖最后由 wxlfh 于 2010-11-09 13:46 编辑

回复 7# dove-young


    一般文本文件按行读到内存时,都要去掉行尾的换行符。
安全点,用这样
  1. chomp $_;    #需要去掉换行符的类似的变量,不一定是$_
复制代码
如果确定,可以直接去掉最后一个字符,当然不是换行符也会去掉
  1. chop $_;
复制代码

论坛徽章:
0
10 [报告]
发表于 2010-11-08 13:58 |只看该作者
回复 9# wxlfh


文本文件读到内存,行尾的换行符并不会自动去掉,我以前有过同样的教训,灵异事件,找不到原因,所以使用chomp是个好习惯。
您需要登录后才可以回帖 登录 | 注册

本版积分规则 发表回复

  

北京盛拓优讯信息技术有限公司. 版权所有 京ICP备16024965号-6 北京市公安局海淀分局网监中心备案编号:11010802020122 niuxiaotong@pcpop.com 17352615567
未成年举报专区
中国互联网协会会员  联系我们:huangweiwei@itpub.net
感谢所有关心和支持过ChinaUnix的朋友们 转载本站内容请注明原作者名及出处

清除 Cookies - ChinaUnix - Archiver - WAP - TOP