Passing named variables to Perl script

[PhillipEJ]

I'm doing the following:


$command = "/usr/bin/perl /home/cpckyorg/www/cgi-bin/dada/addsub.pl " . escapeshellcmd( "email=$email list=$list" );
exec ( $command, $output );

And the Perl script looks like this:


#!/usr/bin/perl

use CGI qw(:standard);

my $email = param('email');
my $list = param('list');


# Adding the lib path to the dada directory:
use lib qw(/home/cpckyorg/www/cgi-bin/dada);

use DADA::MailingList::Subscribers;

my $lh = DADA::MailingList::Subscribers->new({-list => $list});

# add *one* email address to your list:
$lh->add_subscriber(
{
-email => $email,
}
);


But the variable values for $list and $email are not making it to the Perl script. Can anyone suggest what I'm doing wrong?

Thanks!

[Treeluvin]

Might want to check this out:
http://hostmonsterforum.com/showthread.php?t=3942