my @eDate=map{$cgi->param($_)}qw(eYear eMonth eDate);
@eDate=Add_Delta_Days(@eDate,1);

##</code><code>##

my  @eDate= Add_Delta_Days(map{$cgi->param($_)}
            qw(eYear eMonth eDate),1);

##</code><code>##


my @eDate=Add_Delta_Days((map{$cgi->param($_)}qw(eYear eMonth eDate)),1);