perlを使用して入力ファイルから列を削除する方法

Question

perlを使用して列を削除するにはどうすればよいですか？誰かが私に基本的な例を示すことができますか？たとえば、私はDateと日付値を削除する：

入力ファイル：

Date,Col2,Col3,Col4 
9/14/2011,AA Host Info,Tier 1,Info 
9/14/2011,AR Host Info T1,Tier 1,Info 

期待/新ファイル：

Col2,Col3,Col4 
AA Host Info,Tier 1,Info 
AR Host Info T1,Tier 1,Info 

Answer 1

シンプルに！

#!/usr/bin/perl -p 
s/.*?,//;