+^t.upper[] -@tdupleform[] -#$form:fields.a -#$c[^form:tables.a.columns[]] -#^c.menu{$c.column}[,]
-$atable[$form:tables.a] -^atable.menu{a=$atable.field}[,] +@treplace[] +$copy-paste-clean[^table::set{a b +. _ +, _ ++ _ +& _ +? _ += _}] + +$cache_key[^taint[в.а,с+я]&был?тут=недавно.cache] +# почему-то этот replace роняет апач в 500 ошибку :( +#^cache_key.replace[$copy-paste-clean] +$test[abc] +^test.save[$cache_key]saved
+$cache[^file:list[.;\.cache^$]] +^file:delete[$cache_key]deleted($cache.name)
-@tvoiddefault[] -$var[$form:element] -^var.int(2) -@testdom0[] -$dom[^dom::load[a.xml]] +@xslt2[] +$xdoc[^xdoc::set{ +
hi
-@testlocal[level][local] -$local($level) -before($level):$local
-^if($level<10){ - ^testlocal($level+1) +@tcache2[] +^cache[$DB_HOME/keyключ](2){ + ^math:random(100) } -after($level):$local
-@thashdefault2[] -$hash[ - $.a[1] - $.b[2] - $._default[xx] -] -$hash.c +@ttaintuntaint[] +^taint[html][ -@tcase2[] -$hash[ - $.1{^load[code1]} - $.2{code2} -] -$hash.1 +]zz +
+^untaint[html]{1^taint[ ]2 3} -@tlsplit2[] -$splitURI[^request:uri.mid(1;^request:uri.length[]-1).lsplit[/]] -OK -@tconnect[] -#^connect[mysql://hren:pwd@hren/zz]{hren} -^connect[mysql://]{^void:sql{show tables}} +@tappend2[] +$t[^table::set{a b}]^t.append{1 2}$t.a +@badvsnprintf[] +^connect[zzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzzz]{ +} -@timghtmlyu[] -^img[/i/commons_22_prev.gif][$.vspace(100)] -@img[filename;params] -^if(-f $filename){$thisImage[^image::measure[$filename]]^thisImage.html[$params]} -@timghtml[] -$картинка[^image::measure[i/commons_22_prev.gif]] -#$hash[$.alt[222]] -#^timghtml-nested[$hash] -^timghtml-nested[$.alt[222]] +@badoracequoting[] +$SQL.connect-string[oracle://webspb:webpwd@mts?NLS_LANG=RUSSIAN_AMERICA.CL8MSWIN1251&NLS_DATE_FORMAT=YYYY-MM-DD HH24:MI:SS] +^connect[$SQL.connect-string]{ +^void:sql{delete from paf} +^void:sql{insert into paf values (1, '$form:text')} +$paf[^table::sql{select * from paf}] +^paf.menu{ + $paf.id: ^untaint{$paf.block}
-@timghtml-nested[params] -^картинка.html[$params] +} +
-@tresult[] -44 -$result[] -@voidtest[] -#$var[123x] -^var.int(4) +^rem{ +$news[^table::sql{select description from news}[$.limit(3)]] +^news.menu{ + ^untaint{$news.description}
-@ttext[] -$картинка[^image::load[/i/commons_22_prev.gif]] -^картинка.font[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯабвгдежзийклмнопрстуфхцчшщъыьэюя0123456789-+=!\"%:,.^^^;<>?@()[]'&*/^$;/i/font.gif](5) +} +
+} -^картинка.text(10;10)[ ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijkl] -^картинка.text(10;30)[mnopqrstuvwxyzАБВГДЕЖЗИЙКЛМНОПРСТУФХЦЧШЩЪЫЬЭЮЯ] -^картинка.text(10;50)[абвгдежзийклмнопрстуфхцчшщъыьэюя0123456789] -^картинка.text(10;70)[!-+=!\"%:,.^^^;<>?@()[]'&*/^$!] +$tables[^table::sql{select table_name from user_tables}] +^tables.menu{ +$tables.table_name
+} +} +
+$env:PATH -$response:body[^картинка.gif[]] +@badconstructors[] +$bred[^string::length[]] +$bred[^response::clear[]] +$bred[^int::int[]] -@tdoubledefault[] -$a[123.6x] -#^a.double[] -^a.double(999) +@xloadwrongtable[] +$constr[^xdoc::load[wrongtable.xml]] +^show-xdoc2[$constr] -@tintdefault[] -$a[123x] -#^a.int[] -^a.int(999) - -@t3partycookie2[] -#z
-get:$cookie:test -#
+@tablecolumnerror[] +$t[^table::set{a}] +$t.$a -@measuretest[] -$im[^image::measure[mm3.gif]] -x:y=${im.width}:${im.height}
- -@savetest[] -$file[^file::load[text;index.html]] -^file.save[binary;/some/dir/here.dat] -OK - -@oratestinsert[] -^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{ -#^void:sql{create table lobtest(test clob)} -^void:sql{insert into lobtest values (/**test**/'бу''квы')} -$table[^table::sql{select * from lobtest}] -^table.menu{^table.line[] } -} +@roll[] +#$date[^date::set(1970;1;2)] +#^date.roll[month](-1) +$date[^date::set(2038;1;1)] +^date.roll[month](+1) +$date.year $date.month $date.day -@oratestread[] -^connect[oracle://mts_admin:admin_pwd@ORACLE.PAF.OFFICE.DESIGN.RU]{ -^rem{ -$tables[^table::sql{select table_name from user_tables}] -^tables.menu{ - $tables.table_name
-} -
-} -$news[^table::sql{select * from news}[$.limit(2)]] -^rem{ -news columns:
-$news_columns[^news.columns[]] -^news_columns.menu{ - $news_columns.column
+@cookie2[] +#=$cookie:clientType[$.value[test]]=
+=$cookie:clientType=
+ + +@tableset[] +$a[^table::set{a +1 +2}] +^eval(100\$a) + + + +@zzz[] + + +$constructor[ +
} -
} -news description:
-^news.menu{ -
- $news.description + + +@thashforeach3[] +$h[ + $.a[1] + $.b[2] +] +$c[^table::set{a +^h.foreach[key;value]{$value +}}] +$c.a + +@thashforeach2[] +$h[ + $.a[1] + $.b[2] +] +$c[ +^h.foreach[key;value]{ + $.$key[$value] } +] +$c.b + +@thashforeach[] +$h[ + $.a[1] + $.b[2] +] +^h.foreach[key;value]{ + $key=$value
} -@process_check[] -$f[^file::load[text;process.tpl]] -^process[$f.text] +@thashdelete[] +$h[$.a[1] $.b[2]] +was:
+count=^h._count[]
+b='$h.b'
-@ffcheck[] -^file:find[bug/index.html]{not found} +^h.delete[b] -@list[] -$list[^file:list[.;.*\.html^$]] -^list.menu{$list.name
} -#^list.count[] +now:
+count=^h._count[]
+b='$h.b' -@func[param] -#[local] -$local(0) -^local.inc(1) -#$local($local+1) -^if($param<10){^func($param+1)} -=$local= +@sappend[] +$test[123] +^test.save[test] +^test.save[append;test] -@bannerSSI[][code] -$code[^file::cgi[/../cgi-bin/bbssi.pl; - $.QUERY_STRING[d=1&H=ad1.lbe.ru&pubid=91033&pg=1&vbn=26&num=1&w=-1&h=-1&r=ssi&i=http://go.bb.ru/images/onerror/bb.gif&g=http://www.bb.ru&before=
^untaint[as-is]{$code.text}]
+@tappend[]
+$test[^table::set{a b
+a1 b1}]
+^test.save[test]
+$test[^table::set{a b
+a2 b2}]
+^test.save[append;test]
-@bannerJS[]
-
-
-
-
-@tests[]
-$ab(123)
-${[ab]}=
--$хэш[$.возраст(88)] $достать[$.поле[возраст]] ^хэш.[$достать.поле].format{%05d} + +@tform[] +^if(def $form:new_file){y}{n} +