- # dispatch to pkgreport.cgi
- #print "HTTP/1.1 200 OK\n";
- open(my $fh,'-|',"$options{cgi_bin}/$1") or
- die "Unable to execute $options{cgi_bin}/$1";
+ my @exec_options = "$options{cgi_bin}/$1";
+ if ($options{git_mode}) {
+ unshift @exec_options,
+ 'perl','-I',$options{base_dir},'-T';
+ }
+ open(my $fh,'-|',@exec_options) or
+ die "Unable to execute $options{cgi_bin}/$1";