Select Code to Download

    my $WhereVal = $Return->[0]->{WhereVal};
    my $Temp2 = 2;
    warn $WhereVal;
    eval "\$Temp = qq/$WhereVal/";
    warn $Temp;

c.AppModule=m.AppModule and m.Application=$Temp2 at (eval 43) line 19.
Use of uninitialized value in concatenation (.) at (eval 43) line 20.
Use of uninitialized value in warn at (eval 43) line 21.

sub VWP_RunQuery {
  my ($QueryRef, @Params) = @_;
...
  }
  VWP_StrMessage(1, 13, $QueryRef);
}