Diff for /parser3/src/www/htdocs/Attic/index.html between versions 1.260 and 1.283

version 1.260, 2001/08/07 13:23:33 version 1.283, 2001/08/28 14:39:50
Line 1 Line 1
 @USE  @USE
 t.p  t.p
   dtf.p
   
   @main[]
   #^tfilemove[]
   #^treplace[]
   ^measuretest[]
   #^savetest[]
   #^oratestinsert[]
   #^oratestread[]
   #^process_check[]
   #^ffcheck[]^[xxx]
   
   #$ORIGINS(1)
   #^list[]
   #^tests[]
   #^func(0)<hr>
   
   @tfilemove[]
   ^file:move[a/a;b/b]
   
   @treplace[]
   $шило-на-мыло[^table::set{a     b
   шило    мыло
   }]
   $строка[бывает шило в задице]
   ^строка.replace[$шило-на-мыло]<BR>
   
   @measuretest[]
   $im[^image::measure[mm3.gif]]
   x:y=${im.width}:${im.height}<BR>
   
   @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]  @bannerSSI[][code]
 $code[^file::cgi[/../cgi-bin/bbssi.pl;  $code[^file::cgi[/../cgi-bin/bbssi.pl;
Line 21  document.write(''); Line 109  document.write('');
 </script>  </script>
 <!-- BannerBank advertising end: new -->  <!-- BannerBank advertising end: new -->
   
 @main[]  @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)  ^math:random(3686)
 <hr>  <hr>
   
Line 1633  $tt.0<br> Line 1753  $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 1653  $tt.0<br> Line 1773  $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.260  
changed lines
  Added in v.1.283


E-mail: