作者oldstyle (lucky)
看板Perl
标题Re: [问题] 遇到一个问题
时间Mon Jul 5 23:17:08 2010
我是在工作站上发现这个问题的
本来有一些资料我从excel剪贴到txt 再用ftp传到工作站上去跑
结果就发生了这样的问题
但是一样的事情我在pc上面执行同一支程式 却是ok的
後来我在工作站上 手key了一份一模一样的档案来当input file
结果就成功了@@
所以在猜应该是编码的问题
但是我也不太清楚就是了
希望有高手能帮忙解答
感激不尽.... >_<
※ 引述《oldstyle (lucky)》之铭言：
: 想请教一下 遇到以下的状况该怎麽解决?
: 我有一个档案 想要在每一行的字串最後全部加上"_PAD"
: 本来我是这样做的
: =================================================
: #! /usr/local/bin/perl -w
: use strict;
: open (file,$in_file) or die "open file error";
: foreach (<file>) {
: chomp;
: $_ = $_."_PAD";
: print "$_\n";
: }
: close(file);
: =================================================
: 本来结果应该是
: ABCDE --> ABCDE_PAD
: FGHIJ --> FGHIJ_PAD
: 但我却变成
: ABCDE --> _PADE
: FGHIJ --> _PADJ
: 请问是哪边出了问题呢??
: 谢谢各位!!!
--
※ 发信站: 批踢踢实业坊(ptt.cc)
◆ From: 114.32.218.219