[問題] Perl學習手冊 習題5-2 5-3 \r
chomp(my @lines = <STDIN>);
print "1234567890"x3, "\n";
foreach (@lines)
{
printf STDOUT "%10s\n", $_;
}
本來應該期許出現
1234567890123...90
ab
ak3
這樣的結果
不過我發現我讀進來的每列好像除了\n 還有個\r (大概是因為Windows的關係)
導致對齊結果會差一格。
5-3題也是遇到類似情形,
因為 chomp(my $width=<STDIO>); 無法除掉\r,
導致 "%${width}s"的寫法會失敗,
要嘛就是除掉\r,
要嘛就是改用 "%*s", $width
chomp 可以幫我幹掉\n,
那有沒有簡單的方法除掉\r?
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.251.166.1
※ 編輯: StarTouching 來自: 111.251.166.1 (03/17 23:20)
推
03/17 23:27, , 1F
03/17 23:27, 1F
→
03/18 00:03, , 2F
03/18 00:03, 2F
→
03/18 00:04, , 3F
03/18 00:04, 3F
→
03/18 00:04, , 4F
03/18 00:04, 4F
推
03/18 00:39, , 5F
03/18 00:39, 5F
→
03/18 00:40, , 6F
03/18 00:40, 6F
推
03/18 00:41, , 7F
03/18 00:41, 7F
→
03/18 00:59, , 8F
03/18 00:59, 8F
推
03/18 16:04, , 9F
03/18 16:04, 9F
推
03/18 17:23, , 10F
03/18 17:23, 10F
→
03/18 18:45, , 11F
03/18 18:45, 11F
→
03/18 18:46, , 12F
03/18 18:46, 12F
Perl 近期熱門文章
PTT數位生活區 即時熱門文章