/ / perlの空行を無視しますか? - xcode、perl、automator

perlの空行を無視しますか? - xcode、perl、automator

私は自分のインポートリストを一意にするためにXcode用のAutomatorシェルスクリプトを作成しようとしています。それで私はこのperlの魔法がほぼ完璧に機能することを発見しました:

# Print all unique lines
perl -ne "print unless $a{$_}++"

唯一の摩擦は、それが私の#imports間のすべての空のスペースを削除することです。輸入を機能別にグループ分けするのが好きです。

//Model
#import This.h
#import That.h

// ViewControllers
#import ThisView.h
#import ThatView.h

...スペースを確保したいのですが。

スペースを無視することになる上記の呪文にいくつかのバリエーションがありますか?そうでなければ、これに影響を与える別の方法はありますか?

回答:

回答№1は5

このようなもの:

perl -ne "print unless /S/ && $a{$_}++"

「行に空白以外の文字が含まれていて、すでにハッシュに存在しない限り、印刷します」


回答№2の場合は3

インポートにのみ影響を与えたい場合は、おそらく最も簡単な解決策は、重複排除をで始まる行に制限することです。 #.

perl -ne "print unless /^s*#/ && $a{$_}++"