Thanks to all for the input - here is what I did and it works just fine.
sub build_voicemail_update{
my ($suffix) = @_;
$suffix =~ s/'//g;
my ($pid, $arg);
my $perl_path = qq!c:\\winnt\\system32\\cmd.exe!;
my $app = qq!\/c perl
C:\\web\\cgi-bin\\PHONEL~1\\UPDATE~2\\DISABL~1.PL!;
$arg = "$app $suffix";
if(!(Win32::Spawn($perl_path, $arg, $pid))){
die " could not spawn $path - $arg - $!";
}
}
_______________________________________________
Perl-Win32-Admin mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs