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: UTF-8
$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(9+1): 10
^math:random(1000): 506
^math:log(1000): 6.90775527898214
^math:log10(1000): 3
^math:uuid[]: 90D440F5-A1A4-470E-8CA4-27110A09D9B7
^math:uid64[]: 397E77F8120084DA
^math:md5[StRiNg]: ed4577017f40ccb66fcf09dda2fe2a3c
^math:crypt[StRiNg;$apr1$]: $apr1$3VPKjpRi$d4ezoKX0aw7pvDQFE34um1
^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: 15/8/2022 15:25:42
$now.week: 33
$now.weekyear: 2022
Print now in sql format ^now.sql-string[]: 2022-08-15 15:25:42
Print now in UNIX timestamp format ^now.unix-timestamp[]: 1660566342
Print now in GMT format ^now.gmt-string[]: Mon, 15 Aug 2022 12:25:42 GMT
Number of last day in current month ^now.last-day[]: 31
Roll date to 5 days ahead ^now.roll[day](-5): 10/8/2022
Roll date to 30 days behind ^now.roll[day](30): 9/9/2022

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: 15/8/2022
adate: 15/8/2022
mdate: 15/8/2022

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: 29
Adding record (4279D990-C9B4-41EC-B777-2BF30997AF3F) for 3 days:

$hf.[4279D990-C9B4-41EC-B777-2BF30997AF3F][
   $.value[43121083]
   $.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	0.01274	0.02086	0.023557
$status:rusage.stime (secs)	time for reading files	0.00637	0.006953	0.007852
$status:rusage.maxrss (blocks)	memory, used by process	7496	11564	11564
$status:memory.used (KB)	user	2188	2432	2240
$status:memory.free (KB)	free (fragmentated)	496	252	444
$status:memory.ever_allocated_since_compact (KB)	allocated since last garbage collection	2773.5625	3095.421875	0
$status:memory.ever_allocated_since_start (KB)	allocated since start	2773.5625	3095.421875	3096.125