1 --- 2.0b3.1-ori/libgaim/plugins/perl/perl-common.c 2006-08-20 04:36:31.000000000 +0800 2 +++ 2.0b3.1-my/libgaim/plugins/perl/perl-common.c 2006-08-30 14:29:25.242032000 +0800 3 @@ -172,7 +172,7 @@ 4 execute_perl(const char *function, int argc, char **args) 5 { 6 int count = 0, i, ret_value = 1; 7 - SV *sv_args[argc]; 8 + SV *sv_args[100/*argc*/]; 9 STRLEN na; 10 dSP; 11 PERL_SET_CONTEXT(my_perl); 12