parser

Написать ответ на текущее сообщение

 

 
   команды управления поиском

Ответ

myke 19.03.2004 02:44

См. http://www.computer.edu.ru/test/noquest/

Где auto.p
===
@auto[] ------------------------------------- auto
$root[/test/noquest]
#^include[$root/site.ini]

@main[] ------------------------------------- main

$now[^date::now[]]
$snow[^now.sql-string[]]
$ynow[$now.year]

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1251">
<link rel="stylesheet" type="text/css" href="$root/style.css" title="style">
</head>

<body>
^body[]
^saymod[]
</html>

@include[file][f;fd] ---------------------------------------- include
$f[^file:find[$file]]
^if(def $f){
$fd[^file::load[text;$f]]
^process{^taint[as-is][$fd.text]}}


# ------------------------------------------------------------ debug
@unhandled_exception[exception;stack]
#^unhandled_exception_release[$exception;$stack]
^unhandled_exception_debug[$exception;$stack]


@saymod[][$ru;$fn;$fs] ----------------------------- saymod
$ru[$request:uri]
#$ru -
$fn[^file:fullpath[$ru]]
#$fn -
#^if(^fn.right(1) eq '?'){$sl(^fn.length[] -1) $fn[^fn.left($sl)]}
#$fn
$fs[^file::stat[$fn]]
<br><br>
<div align=right>Страница изменена ^fs.mdate.sql-string[].</div>
===

index.html
===
<html>
<head>
<meta http-equiv="refresh" content="0; url=start.par">
</head>
</html>
===

start.par
===
@body[]
Text.
===

Причём на домашней машине всё работает,
а выкладываю на сервер -- и опаньки...

Дело в перенаправлении?