#!/usr/bin/perl -w

# $Id: amavis.pl,v 1.3 2002/03/25 12:28:22 bengen Exp $

use AMAVIS;
use Getopt::Long;

use vars qw( 
	    $conffile 
	   );

my %options;
GetOptions(\%options, "configfile=s");

my $args={};

AMAVIS->init($args, 'configfile' => $options{configfile});

AMAVIS->process_message($args);

AMAVIS->cleanup($args);

