Parser 3.x test page

If you see this page, you have sucessfully installed Parser and trying to test it.

To see full paths to configuration files and DOCUMENT_ROOT comment out postprocess[] method.

If something is marked as red, then something is configured the wrong way or automatic detection is impossible (related to library files and codepages search with relative paths).

Global variables defined in config auto.p

$CHARSETS:

$SQL:

DOCUMENT_ROOT: equal with test script directory (comment postprocess method for view)
Ïóòü ê ñêðèïòó: comment postprocess method for view
$response:charset: WINDOWS-1251
$request:charset: WINDOWS-1251
$request:uri: /_test_eng.html
$request:query:
$SQL.connect-string: defined
$MAIL.SMTP: undefined
$CLASS_PATH:

/../data/classes/auth	directory exist
/../data/classes/date	directory exist
/../data/classes/common	directory exist
/../data/classes/sql	directory exist
/../data/classes	directory exist

Parser demo

Manipulations with cookie (class $cookie)

Read $cookie:test: undefined
Write to cookie value ABC $cookie:test[ABC] (press Reload)

Math operations (class $math)

^eval(6+1): 7
^math:random(1000): 617
^math:uuid[]: C6261A8C-076F-4E45-BAB5-39168558A064
^math:uid64[]: 1A5E03C116A82B6B
^math:md5[ñòðîêà]: 4a418b1973f47583cb45652a6f48df45
^math:crypt[ñòðîêà;$apr1$]: $apr1$L4SC0I4f$lclRpxrMiI5K8efN4vY8d/

Strings manipulations (class $string)

Definition $str[ÀáâÃäå]
String length ^str.length[]: 6
Uppercase string ^str.upper[]: ÀÁÂÃÄÅ
Lowercase string ^str.lower[]: àáâãäå
First 2 chars ^str.left(2): Àá
Last 3 chars ^str.right(3): Ãäå
Substring ^str.mid(1;3): áâÃ
Position 'Ã' char ^str.pos[Ã]: 3
Position 'X' char ^str.pos[X]: -1
Replacement substring 'âÃ' to XX using match ^str.match[âÃ][]{XX}: ÀáXXäå
Replacement chars 'â' to 'Y', 'Ã' to 'Z' using ^str.replace[$repl]: ÀáYZäå
^str.trim[both;å]: ÀáâÃä
^str.base64[]: wOHiw+Tl

Form values manipulations (class $form)

$form:a: undefined
Safe conversion $form:a to integer: ^form:a.int(1): 1
$form:b undefined
$form:qtail: undefined
click here to check reading form values

Manipulations with hash (class $hash)

$hash1[
  $.a[1]
  $.b[2]
  $.c[3]
]
^hash1.foreach[key;value]{
  $key=$value
}[<br />]

Manipulations with table

$tbl1[^table::create{name	col1	col2
Vasya	3	5
Dima	4	14}]

Print content $tbl1:

string	name	col1	col2
1	Vasya	3	5
2	Dima	4	14

$tbl2[^table::create{name	col1	col2
Vova	3	44}]

join $tbl1 to $tbl2 [^tbl2.join[$tbl1]]
$tbl2 rows quantity ^tbl2.count[]: 3
Print table:

string	name	col1	col2
1	Vova	3	44
2	Vasya	3	5
3	Dima	4	14

select table rows where $col1 equal 3: ^tbl2.select($tbl2.col1 == 3)

string	name	col1	col2
1	Vova	3	44
2	Vasya	3	5

Making hash with tables (where hash keys are $col1 values): $hData[^tbl2.hash[col1][$.distinct[tables]]]

Print hash data:

Key	Value
3	string name col1 col2 1 Vova 3 44 2 Vasya 3 5
4	string name col1 col2 1 Dima 4 14

Date manipulations (class $date)

$now[^date::now[]]
Now $now.day/$now.month/$now.year ${now.hour}:${now.minute}:$now.second: 4/2/2012 12:58:57
Print now in sql format ^now.sql-string[]: 2012-02-04 12:58:57
Print now in UNIX timestamp format: 1328345937
Roll date to 5 days ahead ^now.roll[day](-5): 30/1/2012
Roll date to 30 days behind ^now.roll[day](30): 29/2/2012

Manipulations with files (class $file)

Write table $tbl1 to file _test.cfg [^tbl1.save[_test.cfg]]: File created successfully
^file:dirname[_test.cfg]: .
^file:basename[_test.cfg]: _test.cfg
^file:justname[_test.cfg]: _test
^file:justext[_test.cfg]: cfg

Get saved file information $fstat[^file::stat[_test.cfg]]:
File size [$fstat.size]: 35
cdate: 4/2/2012
adate: 4/2/2012
mdate: 4/2/2012

Loading data into $tbl3 from file DOCUMENT_ROOT/_test.cfg and out table content [$tbl3[^table::load[_test.cfg]]]:

string	name	col1	col2
1	Vasya	3	5
2	Dima	4	14

Working with class $hashfile

Create object: $hf [$hf[^hashfile::open[_test]]]: object was created sucessfully

$hf.[48CD74DF-D176-48E3-B909-19668C68A5CB][
   $.value[439740851]
   $.expires(3)
]

Manipulations with enviroment variables (class $env)

Working with SQL

^int:sql{SELECT 2+2}: 4

Manipulations with XML

Create xdoc:

$document[^xdoc::create{<?xml version="1.0" encoding="WINDOWS-1251" ?>
<document>
	<t attr="Hello" n="123"/>
	<t attr="Bye" n="234" n2="xxx"/>
	<text>Text</text>
</document>}]

Working with classes Status and Memory

Field	Description	Value
		on start	now	after ^memory:compact[]
$status:rusage.utime (secs)	process time	0.013216	0.020896	0.024452
$status:rusage.stime (secs)	time for reading files	0.004407	0.005224	0.005224
$status:rusage.maxrss (blocks)	memory, used by process	6444	7992	8200
$status:memory.used (KB)	user	2436	2716	2512
$status:memory.free (KB)	free (fragmentated)	248	864	1068
$status:memory.ever_allocated_since_compact (KB)	allocated since last garbage collection	3106.57	3479.93	1.03125
$status:memory.ever_allocated_since_start (KB)	allocated since start	3106.57	3479.93	3482.05