Diff for /parser3/www/htdocs/Attic/index.html between versions 1.16 and 1.29

version 1.16, 2002/03/04 14:51:11 version 1.29, 2002/03/28 14:26:49
Line 7  $response:charset[windows-1251] Line 7  $response:charset[windows-1251]
 $response:content-type[$.value[text/html]$.charset[$response:charset]]  $response:content-type[$.value[text/html]$.charset[$response:charset]]
   
 @main[]  @main[]
 ^execlangs[]  ^cacheexpireschanging[]
   #^cacheexpiresfixed[]
   #^dateoffsets[]
   #^exceptionTypes[]
   #^roll2[]
   #^rolls[]
   #^exceptions1[]
   #^locate_by_expr[]
   #^method_junction_params{...}
   #^verifyCookie[paf]
   #^execlangs[]
 #$t[^tobjeresult[]]$t.a  #$t[^tobjeresult[]]$t.a
 #^xmlprobs[]  #^xmlprobs[]
 #^doubleprobs[]  #^doubleprobs[]
Line 105  $response:content-type[$.value[text/html Line 115  $response:content-type[$.value[text/html
 <hr>  <hr>
 OK  OK
   
   @cacheexpireschanging[]
   ^cache[$DB_HOME/keyключ][^date::now(+1)]{ ^rem{1 day}
       ^cache[^date::now(+4/24/60/60)]
   #    ^cache(2)
       ^cache(0)
           ^math:random(100)
   }
   
   
   
   @cacheexpiresfixed[]
   ^cache[$DB_HOME/keyключ][^date::now(+2/24/60/60)]{
           ^math:random(100)
   }
   
   @dateoffsets[]
   $d[^date::create(^date::now[]+1/24/60)]
   #$d[^date::now(+1/24/60)]
   ^d.sql-string[]
   #$d
   
   @exceptionTypes[]
   #    parser.compile       ^test[}                компиляция (непарная скобка, ...)
   #    parser.runtime       ^if(0).                параметры (больше/меньше, чем нужно, не тех типов, ...)
   #    number.zerodivision  ^eval(1/0) ^eval(1%0)
   #    number.format        ^eval(abc*5)
   #    file.missing         ^file:delete[delme]                       not found
   #    file.access          ^table::load[.]                       no rights
   #    image.format         ^image::measure[index.html]                        not gif/jpg
   #    sql.connect          ^connect[mysql://baduser:pass@host/db]{}                       not found/timeout
   #    sql.execute          ^connect[mysql://okuser:pass@host/db]{^void:sql{select bad}}                       syntax error
   #    xml                  ^xdoc::create{<forgot?>}                       any error in xml/xslt libs
   #    smtp.connect                                not found/timeout
   #    smtp.execute                                communication error
   
   @roll2[]
   $d[^date::create(2002;4;2;2;2;3)] ^d.sql-string[]<br>
   ^d.roll[day](+365*3+1) ^d.sql-string[]<br>
   
   
   @rolls[]
   $d[^date::create(2002;4;4)]
   ^d.sql-string[]<br>
   ^for[i](1;7){
   ^d.roll[day](-1)
   ^d.sql-string[]<br>
   }
   <hr>
   $d[^date::create(2002;3;28)]
   ^d.sql-string[]<br>
   ^for[i](1;7){
   ^d.roll[day](+1)
   ^d.sql-string[]<br>
   }
   <hr>
   $d[^date::create(2002;12;3)]
   ^d.sql-string[]<br>
   ^for[i](1;14){
   ^d.roll[day](-1)
   ^d.sql-string[]<br>
   }
   <hr>
   $d[^date::create(2002;10;19)]
   ^d.sql-string[]<br>
   ^for[i](1;14){
   ^d.roll[day](+1)
   ^d.sql-string[]<br>
   }
   
   
   
   
   
   
   @exceptions1[]
   ^try{
           aaa
           ^throw[custom1;paf;is stupid]
   }{
           ^if($exception.type eq custom1){
   #               $exception.handled(1)
           ^throw[$exception]
                   type=$exception.type<br>
               source=$exception.source<br>
               file=$exception.file<br>
               lineno=$exception.lineno<br>
           comment=$exception.comment<br>
           }
   }
   
   @locate_by_expr[]
   $t[^table::create{a     b
   1       nok
   2       ok
   3       nok
   }]
   ^if(^t.locate($t.a==2)){$t.b}{n}
   
   @method_junction_params[param]
   ^if($param is junction){junction}{ne junction}
   
   @verifyCookie[value] 
   ^if($cookie:dummyvote eq $value){ 
           $result(1) 
   }{ 
           $cookie:dummyvote[$value] 
           $result(0) 
   }
   
 @execlangs[]  @execlangs[]
 $f[^file::exec[test.pl]]  $f[^file::exec[test.pl]]
 ^process{$f.text}  ^process{$f.text}

Removed from v.1.16  
changed lines
  Added in v.1.29


E-mail: