#! /bin/csh -f
foreach i ($*)
  echo $i `wc -l $i` | awk '{print substr($i,5,3),$2}'
end