刪除重複的行
回答
perl -ne 'my $p=1;@w=split;for(@w){$p=0 if $w{$_}}print if $p;$w{$_}=1 for(@w)' file
絕招:我使用這兩個數組@w
當前行的話,哈希%w
用於前面行中遇到的所有單詞。 $p
用於指示打印是必要的。
這將打印foo bar foo
。 不是的版本更容易,但它作爲OP的練習。 :-)
你是一個巫師!你可以使用「grep」或「sort」功能嗎? 因爲我不明白perl所有這一切......我認爲你正在使用Perl的殼。我在說什麼時可能會出錯,但如果是這樣的話,你可以只使用shell命令,比如grep,sort等嗎?只是bash編程 對不起,我一開始並不具體,我非常感謝你的回答。 – user3019617
我確信shell工具是可能的,但使用Perl oneliner可以更容易。除了一些嵌入式系統外,Perl在任何地方都可用。我甚至在我的路由器上。 – SzG
非常感謝你的輸入。你肯定展示了我不知道的東西。我會盡力投資perl。 – user3019617
- 1. 刪除重複行
- 2. 刪除重複行
- 3. 刪除重複行
- 4. Datagridview刪除重複的行
- 5. 刪除重複的行?
- 6. 刪除重複的行MySQL
- 7. 刪除重複的行?
- 8. 刪除重複的行
- 9. 刪除重複的行
- 10. 刪除重複的行mysql
- 11. SQL刪除重複的行
- 12. 刪除重複的行
- 13. 刪除重複的行?
- 14. MYSQL重複刪除重複行並刪除重複行數據最少
- 15. 刪除重複行(不要刪除所有重複)
- 16. VBA Excel刪除重複行
- 17. JackRabbit - 刪除重複行
- 18. Linux:刪除重複行
- 19. 如何刪除重複行
- 20. MySQL/ASP - 刪除重複行
- 21. matlab:重複行刪除
- 22. SQL刪除重複行
- 23. Shell |刪除重複行
- 24. R刪除重複行
- 25. 刪除重複
- 26. 刪除重複
- 27. 刪除「重複」
- 28. 刪除重複
- 29. 重複刪除
- 30. 刪除重複
因此,如果在一行中找到以前行中的任何單詞,它必須被刪除? – fedorqui
如何行:'foo bar foo'移除或保留?你的真實輸入文件有多大? – Kent
輸入文件是一個文本文件,每行包含大約30個字符。它有隨機的單詞和fedorqui給出的描述是完美的。這就是我想要的 – user3019617