[BACK]Return to index.html CVS log [TXT] [DIR] Up to [parser3project] / parser3 / www / htdocs

Diff for /parser3/www/htdocs/Attic/index.html between versions 1.59 and 1.65

version 1.59, 2002/05/16 16:18:20 version 1.65, 2002/06/11 12:20:43
Line 1 Line 1
 #@USE  #@USE
 #t.p  #t.p
   
 @autoz[]  @autoZ[]
   #$form:here
 $request:charset[windows-1251]  $request:charset[windows-1251]
 $response:charset[windows-1251]  $response:charset[windows-1251]
 $response:content-type[$.value[text/html]$.charset[$response:charset]]  $response:content-type[$.value[text/html]$.charset[$response:charset]]
   
 @postprocess[body]  #@postprocess[body]
 #=$env:HTTP_TEST=<br>  #<b>$body</b>
 #=$env:REDIRECT_HTTP_TEST=<br>  #$result[123]
 #<hr>  
 $body  
 <hr>  
 OK  
   
 @main[]  @main[]
 #^sqldefaults[]  #^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
   #       ^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>
   #    ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
   #}
 #^eval(2)  #^eval(2)
 #^tcrashlocaljunctionsv2[]  #^tcrashlocaljunctionsv2[]
 #^tcrashlocaljunctions[]  #^tcrashlocaljunctions[]
Line 157  OK Line 157  OK
 #^tstoredproc[]  #^tstoredproc[]
 #^tstoredproc2[]  #^tstoredproc2[]
 #^forkeys[]  #^forkeys[]
 ^pngsize[]  #^pngsize[]
   #^checkList[]
   #^datetest[]
   #^tserge[]
   ^envt[]
   
   @envt[]
   $f[^file::exec[showenv.cmd]]
   $f.status<br>
   $f.stderr<br>
   <pre>$f.text</pre>
   
   
   @tserge[]
   ^if(" 09 "){y}
   
   @datetest[]
           $f[^file::stat[some.zip]]
   Размер в байтах: $f.size<br>
   Год создания: $f.cdate.year<br>
   $now[^date::now[]]
   $DAYS_CONSIDERED_NEW(3)
   Статус: ^if($f.mdate >= $now-$DAYS_CONSIDERED_NEW){новый;старый}
   
   
   @checkList[]
   ...^oneOf[a;a,b,c]...<br>
   #...^oneOf[a;ax,b,c]...<br>
   ...^oneWord[word]...<br>
   #...^oneWord[wo rd]...<br>
   
   
   @oneOf[s;list][t] выдаёт строку, если строка она есть в списке(разделенном запятыми)
   $t[^list.lsplit[,]]
   ^if(!^t.locate[piece;$s]){^throw[user;$s;unknown]}
   $result[$s]
   
   @oneWord[s]
   ^if(^s.match[\W]){^throw[user.data;$s;not word]}{$s}
   
 @pngsize[]  @pngsize[]
 $i[^image::measure[test.png]]  $i[^image::measure[test.png]]
Line 301  $h[^t.hash[p]] Line 339  $h[^t.hash[p]]
         ^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>          ^int:sql{select news_id from news where news_id=-1}[$.default{2}]<br>
     ^string:sql{select news_id from news where news_id=-1}[$.default{2}]      ^string:sql{select news_id from news where news_id=-1}[$.default{2}]
 }  }
   =======
   <hr>
   OK
   >>>>>>> 1.50
   
 @tcrashlocaljunctionsv2[]  @tcrashlocaljunctionsv2[]
 $a[  $a[
Removed from v.1.59  
changed lines
  Added in v.1.65

E-mail: