Little test AP functions
function main
local cTest := "my Test"
? "--------------------------------------"
? "AP_Body() Returns the request body as a string"
? AP_Body()
? "--------------------------------------"
? 'AP_Method() returns "GET" or "POST" according to the client request'
? AP_Method()
? "--------------------------------------"
? "AP_FileName() --> cFileName returns the filename.prg provided to Apache by the client"
? ValToChar(AP_FileName())
? "--------------------------------------"
? "AP_GetPairs() --> Hash returns a hash with all GET pairs, key and value "
? ValToChar(AP_GetPairs())
? "--------------------------------------"
? "AP_Args() --> cArgs returns the args provided to Apache by the client if any "
? ValToChar( AP_Args() )
? "--------------------------------------"
TEMPLATE PARAMS cTest
<!DOCTYPE html>
<html>
<head>
</head>
<body>
<h1>This is a heading</h1>
<p>This is a paragraph.</p>
<a href="#?test=<?prg return cTest ?>">Pasa variable <?prg return cTest ?></a>
</body>
</html>
ENDTEXT
return
//----------------------------------------------------------------------------//
