すんません、awkおよびperlで、

123 345 567 $ this is comment
987 654 321 $ another comment
......

ていうかんじのテキストデータファイルがあるとして、
各行の$以降を削除して数字データだけにしたいとき
どうすればいいのですか?