Skip to content | Change text size
#!/usr/local/bin/perl -- print("Content-type: text/html\n\n"); use CGI; $query = new CGI; $puri = $query->param('URI'); $endp = $query->param('ENDPAR'); $sep = $query->param('SEP'); $nomonash = $query->param('NOMONASH'); $noroot = $query->param('NOROOT'); $startpoint = $query->param('STARTPOINT'); if (defined($puri)) { $var = $puri } else { $var = $ENV{'REQUEST_URI'}; } $filename = $ENV{'SCRIPT_FILENAME'}; $directory = substr($filename,0,rindex($filename,'/')); %replacenames = (); @array = split("/",$var); if (-e("$directory/breadcrumbs.conf")) { open(CONFIGFILE,"$directory/breadcrumbs.conf"); $config = new CGI(CONFIGFILE); close(CONFIGFILE); foreach $key ($config->param) { $value = $config->param("$key"); $replacenames{"$key"} = "$value"; } } $s = scalar(@array); $start = 1; $end = $s - 2; $count = $start; $display_count = $count; if (defined($startpoint)) { foreach (1..$s) { if ($startpoint eq $array[$_]) { $display_count = $_; } } } print('\n"); }
Zebra fish

Steroid patch boosts sex drive
An international study has confirmed steroid patches can significantly increase the sex drive of postmenopausal women not using hormone replacement therapies.

Monash research

Monash University is committed to finding solutions for 21st Century challenges such as climate change, water shortage, cancer, diabetes, obesity and those posed by terrorism.

Information for: