Re: [問題] 正規表示法一問

[cutecpu (可愛中央處理器)]

#!/usr/bin/perl -w

while(<>){
   s/([^\t]*)\t/(!$1?'NA':$1)."\t"/eg;
   s/\t\n/\tNA\n/;
   print;
}

※ 引述《Godkin (Nostalgie)》之銘言：
: 請問各位前輩,
: 如果我有一筆資料, 當中有某種程度的缺值(Missing values)
: 例如:
:    值   值   值   值
:    值        值   值
:    值   值   值
: 當中值跟值之間都是用tab隔開
: 現在我想把裏頭缺值的部分替換成"NA"或是其他字串
: 這邊有辦法用一行perl指令或是sed之類的方式去做字串的取代嗎?

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 210.59.164.109
推 Godkin:感謝!!
→ windincloud:我以為只要抓出\t\t改成\tNA\t這樣就好了~ :P