mythweb.pl File Reference

Go to the source code of this file.

Functions
chdir	dirname (abs_path($ENV{'SCRIPT_FILENAME'}or $0))
	substr ($ENV{'PATH'}, 0, 0)
shift Path	if ($Path[0] eq 'pl')
Variables
use CGI	qw
use	DBI
use Cwd	abs_path
our	$cgi = new CGI
our	Path = split('/', $Path[0])
	$Path [0] = ($ENV{'PATH_INFO'} or url_param('PATH_INFO'))

---

Function Documentation

chdir dirname

(

abs_path($ENV{'SCRIPT_FILENAME'}or $0)

)

substr

(

)

Referenced by by(), Services_JSON::decode(), if(), sajax_get_js_repr(), and while().

shift Path if

(

$Path eq 'pl'

[0]

)

---

Variable Documentation

use CGI qw

Definition at line 12 of file mythweb.pl.

use DBI

Definition at line 13 of file mythweb.pl.

use Cwd abs_path

Definition at line 14 of file mythweb.pl.

our $cgi = new CGI

Definition at line 25 of file mythweb.pl.

use File::Path = split('/', $Path[0])

Definition at line 28 of file mythweb.pl.

Referenced by FilterManager::FilterManager().

$Path[0] = ($ENV{'PATH_INFO'} or url_param('PATH_INFO'))

Definition at line 29 of file mythweb.pl.