531 |
(void) handler_args; |
(void) handler_args; |
532 |
(void) handler_pointer; |
(void) handler_pointer; |
533 |
|
|
534 |
argv = plugin->explode_string (plugin, arguments, " ", 0, &argc); |
if (arguments) |
535 |
|
argv = plugin->explode_string (plugin, arguments, " ", 0, &argc); |
536 |
|
else |
537 |
|
{ |
538 |
|
argv = NULL; |
539 |
|
argc = 0; |
540 |
|
} |
541 |
|
|
542 |
switch (argc) |
switch (argc) |
543 |
{ |
{ |
645 |
plugin->printf_server (plugin, |
plugin->printf_server (plugin, |
646 |
"Perl error: wrong argument count for \"perl\" command"); |
"Perl error: wrong argument count for \"perl\" command"); |
647 |
} |
} |
648 |
plugin->free_exploded_string (plugin, argv); |
|
649 |
|
if (argv) |
650 |
|
plugin->free_exploded_string (plugin, argv); |
651 |
|
|
652 |
return 1; |
return 1; |
653 |
} |
} |
654 |
|
|