Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.256 and 1.277

version 1.256, 2001/08/06 09:33:19 version 1.277, 2001/08/24 07:04:52
Line 1 Line 1
   @USE
   t.p
   dtf.p
   
 @main[]  @main[]
   #^savetest[]
   ^oratestinsert[]
   #^oratestread[]
   #^process_check[]
   #^ffcheck[]^[xxx]
   
   #$ORIGINS(1)
   #^list[]
   #^tests[]
   #^func(0)<hr>
   
   @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[] <!--. $table.test -->}
   }
   
   @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<br>
   }
   <hr>
   }
   $news[^table::sql{select * from news}[$.limit(2)]]
   ^rem{
   news columns:<br>
   $news_columns[^news.columns[]]
   ^news_columns.menu{
           $news_columns.column<br>
   }
   <hr>
   }
   news description:<br>
   ^news.menu{
   <hr>
           $news.description
   }
   }
   
   @process_check[]
   $f[^file::load[text;process.tpl]]
   ^process[$f.text]
   
   @ffcheck[]
   ^file:find[bug/index.html]{not found}
   
   @list[]
   $list[^file:list[.;.*\.html^$]]
   ^list.menu{$list.name<br>}
   #^list.count[]
   
   @func[param]
   #[local]
   $local(0)
   ^local.inc(1)
   #$local($local+1)
   ^if($param<10){^func($param+1)}
   =$local=
   
   @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=<center>&after=</center>&bafter=]
   ]]
   $result[<pre>^untaint[as-is]{$code.text}</pre>]
   
   @bannerJS[]
   <!-- BannerBank advertising begin: new -->
   <script>
   // <!--
   var userid = 91033;
   var page = 1;
   var rndnum = Math.round(Math.random() * 10000);
   document.write('<center><A HREF="http://ad1.lbe.ru/bb.cgi?cmd=go&pubid=' + userid + '&pg=' + page + '&vbn=26&num=1&w=100&h=100&nocache=' + rndnum + '" target="_top">');
   document.write('<IMG SRC="http://ad1.lbe.ru/bb.cgi?cmd=ad&pubid=' + userid + '&pg=' + page + '&vbn=26&num=1&w=100&h=100&nocache=' + rndnum + '" width=100 height=100 Alt="new" border=0></A><BR></center>');
   document.write('');
   // -->
   </script>
   <!-- BannerBank advertising end: new -->
   
   @tests[]
   $ab(123)
   ${[ab]}=
   <hr>
   $хэш[$.возраст(88)] $достать[$.поле[возраст]] ^хэш.[$достать.поле].format{%05d}
   <hr>
   
   $люди[
           $.вася[
                   $.возраст(45)
           ]
   ]
   $человек[
           $.поле[возраст] 
   ]
   
   $люди.вася.[$человек.поле]<br>
   ^люди.вася.[$человек.поле].format{%010d}<br>
   
   
   <hr>
   $unsorted[^table::set{a b
   1       1
   3       3
   2       2
   }]
   $sorted[^unsorted.sort($unsorted.a)]
   ^sorted.menu{$sorted.a}[,]
   <hr>
                   =^dtf:format[aaa-%Y-bbb-%m]=
   <hr>
   
   #$ORIGINS(0)
   ^math:random(3686)
   <hr>
   
   #^bannerJS[]
   #^bannerSSI[]
   
 $t[^table::set{a        b  $t[^table::set{a        b
 1       2  1       2
 }]  }]
Line 1604  $tt.0<br> Line 1736  $tt.0<br>
 приветприветприветприветприветприветприветприветприветприветприветприветпривет321  приветприветприветприветприветприветприветприветприветприветприветприветпривет321
 ')}  ')}
 }  }
         $проверка[^table::sql{select test from lotest}(6)]          $проверка[^table::sql{select test from lotest}[$.limit(6)]]
         ^проверка.menu{          ^проверка.menu{
 #               ^проверка.line[]:<pre>^untaint[as-is]{$проверка.test}</pre>  #               ^проверка.line[]:<pre>^untaint[as-is]{$проверка.test}</pre>
 #               ^проверка.line[]:<pre>^untaint[html]{$проверка.test}</pre>  #               ^проверка.line[]:<pre>^untaint[html]{$проверка.test}</pre>
Line 1624  $tt.0<br> Line 1756  $tt.0<br>
         }[<br>]          }[<br>]
 }  }
 <hr>  <hr>
 $cookie:reg0[$.value[8reg0]$.expires[session]]  #$cookie:reg0[$.value[8reg0]$.expires[session]]
 $cookie:reg1[$.value[8reg1]$.expires[session]]  #$cookie:reg1[$.value[8reg1]$.expires[session]]
 $cookie:reg0  $cookie:reg0
 $cookie:reg1  $cookie:reg1
   

Removed from v.1.256  
changed lines
  Added in v.1.277


E-mail: