1 diff -urN ntop.org/plugins/pep/pep.c ntop/plugins/pep/pep.c
2 --- ntop.org/plugins/pep/pep.c Mon Mar 26 19:30:37 2001
3 +++ ntop/plugins/pep/pep.c Mon Mar 26 20:03:37 2001
6 * a private instance of Perl
8 -static PerlInterpreter * pep_perl = NULL;
9 +static PerlInterpreter * my_perl = NULL;
15 * free the previously allocated perl instance
17 - perl_destruct (pep_perl);
18 - perl_free (pep_perl);
20 + perl_destruct (my_perl);
21 + perl_free (my_perl);
24 traceEvent (TRACE_INFO, "\n");
25 traceEvent (TRACE_INFO, "Thanks for having used PeP....\n");
30 - perl_parse (pep_perl, NULL, pep_argc, pep_argv, NULL);
31 + perl_parse (my_perl, NULL, pep_argc, pep_argv, NULL);
34 * create a new variable, the %traffic hash
37 * and then execute the script
39 - perl_run (pep_perl);
46 * initialization: allocate a private instance of the Perl Interpreter
48 - pep_perl = perl_alloc ();
49 - perl_construct (pep_perl);
50 + my_perl = perl_alloc ();
51 + perl_construct (my_perl);