Select Code to Download

Select or download this

--- lib/CGI/Ajax.pm     (revision 95)
+++ lib/CGI/Ajax.pm     (working copy)
...
   my $outside_url = $self->url_list()->{ $func_name };
   my $url = defined $outside_url ? $outside_url : $script;
   if ($url =~ /\?/) { $url.='&'; } else {$url.='?'}

Select or download this

print $pjx->build_html( $cgi, &Show_HTML($env),$env );

Select or download this

print $pjx->build_html( $cgi, \&Show_HTML($env));

Select or download this

my $ref_show = \&Show_HTML;
my $show = $ref_show->($env);

Select or download this

<Location /pjx>
SetHandler      perl-script
...
PerlSetVar      DBUSER  **
PerlSetVar      DBPASS  **
</Location>

Select or download this
```
package Test::pjx;

...
1;
__END__
```

Select or download this

Screenoutput:
http://simulator.bla.nl:8080/pjx
...
^^^^^
Used to be null, so correct now