Possibly Devel::Cover or Devel::Trace could be of use.
In reply to Re: parsing a load of perl scripts by Fletch in thread parsing a load of perl scripts by Anonymous Monk