#!/usr/bin/perl -w

use strict;

my $status = 0;

foreach my $pkg (@ARGV) {
    print "==> Verifying installed package $pkg: ";
    if ( ! -d "/var/sadm/pkg/$pkg" ) {
	print "MISSING\n";
	$status = 1;
    } else {
	print "ok\n";
    }
}

exit $status;
