Доброго дня суток!

У меня такая вот проблемка, не могу ее никак побороть!  
Буду рада за помощь

Итак, начну...

Мне с перлового скрипта (не CGI, а .pl) надо вызвать мейсоновский компонент.

я делаю так:

   my $plugin = $row->{s_type}->{plugin_cdr_display};
    my $plugin_path_cdr = '/cdr_browser/plugins/'.$plugin.'.mcomp';
    if ( $interp->comp_exists( $plugin_path_cdr ) ) {

        my $comp = $interp->load($plugin_path_cdr);

        if ( $comp->method_exists('get_cdrs') ) { # Ошибка возникает при вызове этой строки!!!!!!!!

            $row->{cdrs} = $comp->exec('get_cdrs', cdr_obj => $cdr, hash => $hash);
        } else {

            $row->{cdrs} = $cdr->get_cdrs( $hash );
        }
    } else {
        warn "The plugin doesn't exist. Path: $plugin_path_cdr";
    }

А в лог пишутся такие ошибки:

Error during compilation of /home/porta-admin/apache/autohandler:
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 132.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 132.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 133.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 151.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 153.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 154.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 181.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 182.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 203.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 204.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 205.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 207.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 208.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 211.
Global symbol "$r" requires explicit package name at /home/porta-admin/apache/autohandler line 216.
BEGIN not safe after errors--compilation aborted at /home/porta-admin/apache/autohandler line 217.


Stack:
  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm:445]
  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Interp.pm:767]
  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Component.pm:328]
  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Component.pm:288]
  [/usr/local/lib/perl5/site_perl/5.8.8/HTML/Mason/Component.pm:279]
  [/home/porta-admin/utils/x.pl:169]

И скрипт завершается с кодом 255.

Может быть кто-то знает в чем проблема?  

Заранее благодарю  

1. CGI -- название протокола, ,pl -- расшитение файла
2. похоже, у вас должно все исполняться из-под mod_perl

Я видел как люди могут ходить без ноги, используюя различные костыли, но ни разу не видел чтобы нога ходила без людей.

вы пытаетесь сделать именно это - заставить ногу ходить без тела.

попробуйте сначала всю среду инициализировать и действовать в рамках ее интерфеса. может быть что нибудь получиться.

Вообщем похоже сама разобралась! Дело совсем не в том... надо было переопределить автохендлер... Всем спасибо за внимание!