[exim] Need a script to separate headers

I need a script to take an mbox file with many messages in it - pipe it
into a script and end up with just the headers. Removing the body of the
message.

Like to use it in a pipe - mbox goes in - headers comes out.

Anyone have something quick and dirty that can do that?