@USE
PhoneNumber.p

$phone[^PhoneNumber:parse[9990000000][
	$.defaultCountry[ru]
]]

$PhoneParser[^PhoneNumber::create[
	$.defaultCountry[ru]
]]
$phone[^PhoneParser.parse[9990000000]]

$phone[
	$.ok(true)
	$.valid(true)
	$.possible(true)
	$.ambiguous(false)
	$.warning[]
	$.country[ru]
	$.countryCallingCode[7]
	$.e164[+79990000000]
	$.digits[79990000000]
	$.nationalDigits[9990000000]
	$.international[+7 999 000 00-00]
	$.national[8 (999) 000-00-00]
	$.type[MOBILE]
	$.error[]
	$.candidates[^table::create{country
	}]
]

$phone[^PhoneNumber:parse[8 800 555-55-50]]

$phone[
	$.ok(true)
	$.valid(true)
	$.possible(true)
	$.ambiguous(true)
	$.warning[ambiguous_country]
	$.country[]
	$.countryCallingCode[375]
	$.e164[+3758005555550]
	$.digits[3758005555550]
	$.nationalDigits[8005555550]
	$.international[+375 800 555 5550]
	$.national[8 800 555 5550]
	$.type[TOLL_FREE]
	$.error[]
	$.candidates[^table::create{country
by
de
id
kz
lu
ru}]
]

document.xml

    ^connect[$lLogger.db]{
      $query[^apply-taint[sql][
        INSERT INTO $lLogger.table
          SET
            Session = '${status:pid}/$status:tid'
            ^if(def $lLevel){   ,Level = ^lLevel.int(-1) }
            ^if(def $lSection){ ,Section = _utf8'^lSection.left(250)'}
           ,Message = _utf8'^taint[$lMessage]'
           ,Host    = _utf8'$env:REMOTE_ADDR ^if($env:HTTP_X_REAL_IP ne $env:REMOTE_ADDR || def $env:HTTP_CF_IPCOUNTRY){($env:HTTP_X_REAL_IP $env:HTTP_CF_IPCOUNTRY)} -> $env:SERVER_ADDR'
           ,Domain  = _utf8'$env:HTTP_HOST / $env:SERVER_NAME'
           ,URI     = _utf8'$env:REQUEST_URI -> $env:PATH_TRANSLATED'
           ,ENV     = _utf8'^taint[^json:string[$env:fields]]'
           ,Forms   = ^if(def $form:fields){_utf8'^taint[^json:string[$form:fields]]'}{NULL}
      ]]
      ^void:sql{$query}
    }

Unhandled exception in eLogger.p(87:13): '\n INSERT INTO log_exception\n SET\n Session = '58979/58979'\n ,Level = 65535 \n ,Section = _utf8'UNHANDLED'\n ,Message = _utf8'EXCEPTION: type: sql.execute\\nsource: \\n INSERT INTO log_exception\\n SET\\n Session = \\'58979/58979\\'\\n ,Level = 65535 \\n ,Section = _utf8\\'db\\'\\n ,Message = _utf8\\'EXCEPTION: type: sql.execute\\\\nsource: UPDATE email SET StatusID = 200 WHERE ID = 102970\\\\nfile: /ext.bounce.p\\\\nlineno: 72\\\\ncolno: 13\\\\ncomment: UPDATE command denied to user \\\\\\'API\\\\\\'@\\\\\\'10.0.0.22\\\\\\' for table \\\\\\'email\\\\\\'\\\\nhandled: 0\\'\\n ,Host = _utf8\\'10.0.0.60 ( ) -> 10.0.0.22\\'\\n ,Domain = _utf8\\'t.local / t.local\\'\\n ,URI = _utf8\\'/?bounce -> /EXT.local/index.p3h\\'\\n "

@CLASS
test

@OPTIONS
locals

@create[]

@getPrivate[]
	$result[$self.vars.private]

@GET_DEFAULT[sFieldName]
	^if(^self.privateVarNames.contains[$sFieldName]){
		^return[PRIVATE]
	}
	$result[$self.vars.[$sFieldName]]

@GET_vars[]
	^if(^reflection:uid[$self] ne ^reflection:uid[$caller.self]){
		^return[PRIVATE]
	}
	$result[
		$.public[777]
		$.private[666]
	]

@GET_privateVarNames[]
	^if(^reflection:uid[$self] ne ^reflection:uid[$caller.self]){
		^return[PRIVATE]
	}
	$result[
		$.private[]
	]

	^use[test.p]
	$oTest[^test::create[]]
	public=$oTest.public<br />
	private=$oTest.private<br />
	private_by_method=^oTest.getPrivate[]<br />
	vars=^json:string[$oTest.vars]<br />
	privateVarNames=^json:string[$oTest.privateVarNames]

public=777 private=PRIVATE private_by_method=666 vars="PRIVATE" privateVarNames="PRIVATE"

	^use[../test/class1.p;
		$.replace(true)
	]

$USED.$filename[название класса и, возможно, еще какие-нибудь параметры]