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: undefined
Ïóòü ê ñêðèïòó: comment postprocess method for view
$response:charset: WINDOWS-1251
$request:charset: UTF-8
$request:uri: /_test_eng.html
$request:query:
$SQL.connect-string: defined
$MAIL.SMTP: undefined
$CLASS_PATH:

/../data/classes/sql	directory exist
/../data/classes/auth	directory exist
/../data/classes/io	directory exist
/../data/classes/utils	directory exist
/../data/classes/engine	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(8+6): 14
^math:random(1000): 73
^math:log(1000): 6.90775527898214
^math:log10(1000): 3
^math:uuid[]: 30D75054-BC5A-4E48-8094-083DD5B5BD14
^math:uid64[]: B6FB47A00D6C698A
^math:md5[StRiNg]: ed4577017f40ccb66fcf09dda2fe2a3c
^math:crypt[StRiNg;$apr1$]: $apr1$lTZlJt.O$xsMX/GwwbDA9M5lnHQVxU1
^math:crc32[StRiNg]: -1398522877

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 of 'á' char ^str.pos[á]: 1
Position of 'á' char starting from position 2 ^str.pos[á](2): -1
Position of '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.trim[start;å]: ÀáâÃäå
^str.trim[end;å]: ÀáâÃä
^str.trim[left;å]: ÀáâÃäå
^str.trim[right;å]: ÀáâÃä
^str.base64[]: 0JDQsdCy0JPQtNC1
^str.js-escape[]: %u0410%u0431%u0432%u0413%u0434%u0435
^str:js-unescape[%u0410%u0431%u0432%u0413%u0434%u0435]: ÀáâÃäå

Working with class $inet

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 (class $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 values are 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

Making hash with strings (where hash keys are col2 values and values are name values): $hData[^tbl2.hash[col2;name][$.type[string]]]

Print hash data:

Key	Value
44	Vova
5	Vasya
14	Dima

Date manipulations (class $date)

$now[^date::now[]]
$now.day/$now.month/$now.year ${now.hour}:${now.minute}:$now.second: 19/1/2021 23:48:51
$now.week: 3
$now.weekyear: 2021
Print now in sql format ^now.sql-string[]: 2021-01-19 23:48:51
Print now in UNIX timestamp format ^now.unix-timestamp[]: 1611089331
Print now in GMT format ^now.gmt-string[]: Tue, 19 Jan 2021 20:48:51 GMT
Number of last day in current month ^now.last-day[]: 31
Roll date to 5 days ahead ^now.roll[day](-5): 14/1/2021
Roll date to 30 days behind ^now.roll[day](30): 13/2/2021

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: 19/1/2021
adate: 19/1/2021
mdate: 19/1/2021

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

File copy (^file:copy[_test.cfg;_copy.cfg]): ok

File delete (^file:delete[_test.cfg]): ok

Working with class $hashfile

Create object: $hf [$hf[^hashfile::open[_test]]]: object was created sucessfully
Number of records: 32
Adding record (4C44157C-ADA2-47CF-A329-522335BC6D11) for 3 days:

$hf.[4C44157C-ADA2-47CF-A329-522335BC6D11][
   $.value[809772297]
   $.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="UTF-8" ?>
<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	208.034316	208.040695	208.136839
$status:rusage.stime (secs)	time for reading files	386.381965	386.381965	386.383764
$status:rusage.maxrss (blocks)	memory, used by process	601160	601160	601160
$status:memory.used (KB)	user	173376	173624	68924
$status:memory.free (KB)	free (fragmentated)	394112	393864	454988
$status:memory.ever_allocated_since_compact (KB)	allocated since last garbage collection	184676.5	185003.34375	7.59375
$status:memory.ever_allocated_since_start (KB)	allocated since start	14157002.609375	14157329.453125	14157337.046875