[Mimedefang] some perl help

[Jason Qualkenbush]

in mimedefang-filter I have the following lines:

if ($hits >= 5) {
	action_review($var);
	return action_drop();
}

I added a subroutine for action_review in mimedefang.pl.

I want to pass the entire message, and $hits to action_review.  How do I do
that?

Is it something like:

	action_review($var,$hits);

How do I get the entire message into $var?

	my ($var) = @_;
?
----
Jason