package GSOURCE;

use Apache2::RequestRec ();
use Apache2::Const -compile =>'OK';

BEGIN { require q(/home/sourcer/mysoftware/config/config.pm);}

use DB::SQL; #* 
use UI::Engine; #*
 
sub handler {

        $| = 1;
        my $r = shift;
        $r->content_type("text/plain");
   
        my ($theOID) = shift @ARGV;
        
        UI::Engine($arg1, $theOID);
   
        return Apache2::0K;
       }
1;


##</code><code>##

error_log
Can't load '/home/sourcer/appz/lib/linux/2.4.21-15.0.2.elsmp/auto/Event/Event.so' for module Event: /home/sourcer/appz/lib/linux/2.4.21-15.0.2.elsmp/auto/Event/Event.so: cannot open shared object file: No such file or directory at /home/sourcer/perl/lib/5.8.8/i686-linux/DynaLoader.pm line 230.
 ......
---------------------------