[rdavisids]

If I run perl -w zmdailyreport

I get
Use of uninitialized value in string ne at zmdailyreport line 103

Here is the area of interest:

sub getMsgIds {
my $ids = shift;
my $user = $options{u};

my $whereClause = "";
my @clauses = ();
my $statement = "";
my $ary;

my %uniqIds = ();
my @clauses = ();

my $count = 0;

%uniqIds = ();

if ($user ne "") {
push @clauses, "(sender like '%".$user."%' or recipient like '%".$user."%')";
}

This appears to be a problem. Is this script correct?