texでソースコードを貼る方法

この前tex書いてたときに作ったスクリプト。
listingsとかより手軽に貼れるかも。

#!/bin/sh
line=`cat $1 | wc -l`
line=`expr $line + 2`
byte=`cat $1 | wc -L`
a2ps -B --borders=no -o $1.ps -L $line -l $byte --columns=1 $1

a2psが入ってれば多分動く。
適当に保存して(src2ps.shとか)
chmod +x src2ps.sh
./src2ps.sh hoge.c
とかすればpsファイルができるので、
そのままなりepsに変換すれば、図としてtexに簡単に貼れる。