切り取りと貼り付けの Linux コマンドの Perl の実装が手っ取り早く汚いのを見たことがあります。perl 'print "$F1"' filename
cut -f1 filename コマンドを置き換えるようなものでした
このPerlのやり方はどうだったのか誰か教えてもらえますか? 具体的には、これはカット/ペーストとは異なり、Windows 環境でも同じように機能するため、興味があります。
Perl Power Toolsについて知っていますか? これらはお気に入りの UNIX コマンドの実装ですが、Perl で行われます。Perl をお持ちの場合は、コマンド ラインでアクロバットなしでお気に入りのコマンドを使用できます。PPT には と の両方がcut
ありpaste
ます。
多くの人がいくつかのスイッチを指摘しましたが、それらすべてを説明するperlrunperl
へのリンクを忘れています。
カットの場合: 解決策を探していると思いますperl -ane
(-e
は次のコードを実行し、ファイル内のすべての行に-an
適用さ@F = split (/\t/,$line)
れます)。次のようなものです:
perl -ane 'print "$F[0]\t$F[1]\n"' file
これは次と同じです:
cut -f1,2 file
貼り付けの場合、これを行う方法はわかりませんが、perl -ane
複数のファイルを入力として受け取ることができると思います。
Perl の cut -c1-2 に相当するもの
perl -alne 'print substr($_,0,2)'