Diff for /parser3/www/htdocs/Attic/index.html between versions 1.135 and 1.166

version 1.135, 2002/09/13 10:43:27 version 1.166, 2002/10/15 15:37:12
Line 1 Line 1
 @USE  @USE
 /derived.p  /derived.p
   /operators.p
   
 @auto[filespec]  @auto[filespec]
 $selffilespec[$filespec]  $selffilespec[$filespec]
Line 22  $response:charset[windows-1251] Line 23  $response:charset[windows-1251]
 #^f[a]  #^f[a]
 #^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{  #^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
 #       ^int:sql{select news_id from news where news_id=-1}[  #       ^int:sql{select news_id from news where news_id=-1}[
 ##      $.default{2}  #       $.default{2}
 #       ]<br>  #       ]<br>
 #    ^hash::sql{bad}  #    ^hash::sql{bad}
 #    ^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}]
Line 101  $response:charset[windows-1251] Line 102  $response:charset[windows-1251]
 #^if($form:test){y}{n}  #^if($form:test){y}{n}
 #^tablecolumnerror[]  #^tablecolumnerror[]
 #^roll[]  #^roll[]
 #^cookie2[]  
 #^tableset[]  #^tableset[]
 #^math:PI.format{%.30f}  #^math:PI.format{%.30f}
 #^xchildren[]  #^xchildren[]
Line 152  $response:charset[windows-1251] Line 152  $response:charset[windows-1251]
 #^pcre[]  #^pcre[]
 #^regexp[]<hr>  #^regexp[]<hr>
 #^mail[]  #^mail[]
 #^exec[]  
 #^fori[]  #^fori[]
 #^tconnect[]  #^tconnect[]
 #^xslt[]  #^xslt[]
 #^xml[]  
 #^header[]  #^header[]
 #^tablehasht[]  #^tablehasht[]
 #^datecreatestring[]  #^datecreatestring[]
Line 206  $response:charset[windows-1251] Line 204  $response:charset[windows-1251]
 #^badpos[]  #^badpos[]
 #^processtest[]  #^processtest[]
 #^mail3[]  #^mail3[]
 #^mail4[]  
 #^datesaving[]  #^datesaving[]
 #^badconstructor[]  #^badconstructor[]
 #^calendar[]  #^calendar[]
Line 220  $response:charset[windows-1251] Line 217  $response:charset[windows-1251]
 #^cookieexpirestest[]  #^cookieexpirestest[]
 #^postest[]  #^postest[]
 #^voidpostest[]  #^voidpostest[]
 #^virtualtest[]  
 #^badcolumntest[]  #^badcolumntest[]
 #^delimiters[]  #^delimiters[]
 #^новый-split[]  #^новый-split[]
Line 232  $response:charset[windows-1251] Line 228  $response:charset[windows-1251]
 #^ttransformsep[]  #^ttransformsep[]
 #^calltest[]  #^calltest[]
 #^xpath3[]  #^xpath3[]
   #^doubleliterals[]
   #^newxor[]
 #^mail2[]  #^mail2[]
 ^doubleliterals[]  #^exec[]
   #^passpost[]
   #^fordelim[]
   #^duplicatetable2hashkey[]
   #^duplicatehashsqlkey[]
   #^longlreplace[]
   #^table2hash_onecolumn[]
   #^crossopvars[]
   #^three[]
   #^badLangAfterCatch[]
   #^zeroinstdin[]
   #^shifts[]
   #^jspace[]
   #^hashselfmodification[]
   #^emptyTransformResult[]
   #^badxdoccreate[]
   #^if(-d "CVS"){y}{n}
   #^badjunctioncall[]
   #^russianindex[]
   #^virtualtest[]
   #^xml[]
   #^mail4[]
   #^voidconstructorpass[]
   #^$form:CLASS.a=$form:CLASS.a<br>
   #^cookie2[]
   #^menudelim[]
   #^touchittest[]
   #^touchittest2[]
   #^opauto[]
   #^trycontextt[]
   #^tfor[]
   #^user-foreach-test[]
   #^includet[]
   #^derived:includet[]
   #^fortestsep[]
   #^derived:inclass_process_test[]
   #$derived[^derived::create[]]^derived.inclass_process_test[]
   #^domorigint[]
   ^junctiontest2[]
   
   @junctiontest2[]
   ^if($if is junction){is junction;not junction}<br>
   ^if(def $if){defined;not defined}<br>
   
   @domorigint[]
   $xdoc[^xdoc::create[вася]]
   ^xdoc.firstChild.setAttribute[name;значение]
   $var[$xdoc.firstChild.nodeName]
   ^throw[paf;$var]
   
   
   @fortestsep[][i]
   ^for[i](1;3){$i}[,]
   
   @includet[]
   ^include[some.p]
   ^included_method[2]
   
   @user-foreach-test[][key;value]
   ^user-foreach[key;value]{$key=$value<br>}
   
   @user-foreach[key;value;code]
   ^for[i](1;10){
           $caller.$key($i)
           $caller.$value($i*2)
           $code
   }
   
   
   @tfor[][i]
   ^for[i](1;10){
   $i
   }
   
   @trycontextt[]
   ^try{
           ^trycontexttsub[]
   }{
           $exception.handled(0)
   }
   
   
   @trycontexttsub[]
   ^bad[]
   
   
   @opauto[]
   ^reada[]
   
   
   @rusage2[]
 <hr>  <hr>
 OK  OK
   
   @rusage2[]
   $s[$status:rusage]
   
   ^s.tv_sec.format[%.0f].^s.tv_usec.format[%06.0f]
   
   
   @voidconstructorpass[]
   $a[$form:a]
   =^form:a.int(1)=
   =^a.int(1)=
   
   
   @russianindex[]
   #dir with files with russian-lang names
   $where[dir]
   
   $dir[^file:list[$where;\.txt^$]]
   ^dir.menu{
           <a href=$where/^untaint[uri]{$dir.name}>$dir.name</a><br>
   }
   
   @badjunctioncall[]
   ^badjunctioncallinside{code}
   
   @badjunctioncallinside[code]
   xx^code[]
   
   @badxdoccreate[]
   $xdoc[^xdoc::create[вася]]
   #$xdoc[^xdoc::create{<?xml version="1.0" encoding="$request:charset"?><doc>вася</doc>}]
   
   ^xdoc.firstChild.setAttribute[name;значение]
   ^xdoc.string[]
   
   
   @emptyTransformResult[]
   $input[^xdoc::create[docBad]]
   $sheet[^xdoc::create{<?xml version="1.0"?> 
   <xsl:stylesheet xmlns:xsl="http://www.w3.org/1999/XSL/Transform" version="1.0">
           <xsl:template match="doc">
                   output
           </xsl:template>
   </xsl:stylesheet>
   }]
   $output[^input.transform[$sheet]]
   $response:body[^output.file[]]
   
   @hashselfmodification[]
   $hash[
           $.a[1]
           $.b[2]
   ]
   ^hash.foreach[key;value]{
   #       $hash.c[1]
           $hash.a[1]
   }       
   
   @touchittest[][i]
   $i[before]
   ^touchit[]
   $i
   
   @touchittest2[]
   $i[before]
   ^touchit[]
   $i
   
   
   @jspace[]
   $a(1)
   ^jspace_call{^eval($a*2)}
   #$a(2)
   #$junction
   
   @jspace_call[param][a]
   $a[unrelcfgdfgated]
   $junction<br>
   $junction.a(2)
   $junction<br>
   
   @shifts[]
   ^eval(1<<3)<br>
   ^eval(8>>2)<br>
   #^if(1=1){y;n}<br>
   
   
   @zeroinstdin[]
   #$f[^file::exec[a.pl;$.stdin[$.shit[]]]]
   $f[^file::exec[a.pl;$.stdin[^file::load[binary;1z2.txt]]]]
   =$f.text=
   ^f.save[binary;1z2.out]
   
   @badLangAfterCatch[]
   ^try{
           $a[ 
                   тут язык сменился на pass_appended
                   ^throw[user;test]
                   и улетело с не тем  языком
           ]
   }{
           $exception.handled(1)
   }
   1  2
   
   @crossopvars[]
   #^one[]<hr>
   ^two[]<hr>
   
   @table2hash_onecolumn[]
   $t[^table::create{a
   1
   1
   }]
   #^t.hash[a]
   #^t.hash[a;b]
   $h[^t.hash[a][$.distinct(1)]]
   $h.1.a
   
   @longlreplace[]
   $str1[  мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла мыла ]
   $str2[ела]
   $str[Мама $str1 раму]
   
   ^str.replace[^table::create[nameless]{мыла      $str2}]
   
   @duplicatehashsqlkey[]
   ^connect[mysql://mdm:4b833ljq@db-mysql/mdm]{
           $t[^table::sql{select * from news}]
           $c[^t.columns[]]
           ^c.menu{$c.column}[,]
   
           $h[^hash::sql{select news_type_id, name from news}[$.distinct(1)]]
   }
   
   @duplicatetable2hashkey[]
   $t[^table::create{a     b
   1       2
   1       3
   }]
   #^t.hash[a]
   #^t.hash[a;b]
   ^t.hash[a][$.distinct[1]]
   
   @menudelim[]
   $t[^table::create{a
   1
   2
   3
   4
   5
   }]
   
   ^t.menu{^if($t.a<3){}{$t.a}}[,]
   
   @fordelim[]
   ^for[a](0;6){^if($a<3){}{$a}}[,]
   
   
   @passpost[]
   <form method=post name="test" id="test">
   <textarea name="text" cols=20 rows =6>^taint[html][1
   2
   
   3]</textarea><br>
   <input type=submit>
   </form>
   
   ^if(def $form:text){
           $a[^file::cgi[a.pl]]
           $a.text|$a.status|$a.stderr<hr>
   }
   
   @exec[]
   #$a[^file::exec[a.cmd]]
   $a[^file::cgi[a.cmd]]
   $a.text|$a.status|$a.stderr<hr>
   
   
   @newxor[]
   ^eval(1!|2 #примечание()zzz
   |0x100)<br>
   #^eval(1!||2)<br>
   ^if(1!|1){y}{n}
   
   #@method[$bad]
   
 @doubleliterals[]  @doubleliterals[]
 #^eval(1e-10)  #^eval(1e-10)
 ^eval("1e-20")  ^eval("1e-20")
Line 389  $date.yearday Line 663  $date.yearday
 ^mail:send[  ^mail:send[
         $.from[paf@mail.design.ru]          $.from[paf@mail.design.ru]
         $.to[paf@mail.design.ru]          $.to[paf@mail.design.ru]
         $.subject[^taint[uri][москва]=2]          $.subject[^taint[uri][москва=E0_+ ]=2]
         $.text[^taint[uri][москва]=]          $.text[^taint[uri][москва]=]
         $.html{<a href=http://there.ru/?city=^taint[uri][Москва]>link</a>}          $.html{<a href=http://there.ru/?city=^taint[uri][Москва]>link</a>}
 ]  ]
Line 504  $sheet[^xdoc::create{<?xml version="1.0" Line 778  $sheet[^xdoc::create{<?xml version="1.0"
   
   <xsl:template match="people">    <xsl:template match="people">
      <html>       <html>
      <head>z</head>       <head>
   <link type='text/xml' rel='alternate' href='/Default.vsdisco'/>
   z</head>
                 para1=<xsl:copy-of select="^$param1"/>                  para1=<xsl:copy-of select="^$param1"/>
         <xsl:apply-templates/>          <xsl:apply-templates/>
         <hr/>          <hr/>
Line 1530  $date.year  $date.month  $date.day Line 1806  $date.year  $date.month  $date.day
   
 @cookie2[]  @cookie2[]
 #=$cookie:clientType[$.value[test]]=<br>  #=$cookie:clientType[$.value[test]]=<br>
 =$cookie:clientType=<br>  =$cookie:CLASS.clientType=<br>
   
   
 @tableset[]  @tableset[]
Line 1904  $response:body[^pict.gif[]] Line 2180  $response:body[^pict.gif[]]
   
 @mail2[]  @mail2[]
 ^mail:send[  ^mail:send[
           $.message-id[<6615%1@parser.ru>]
         $.content-type[$.value[text/plain] $.charset[windows-1251]]          $.content-type[$.value[text/plain] $.charset[windows-1251]]
         $.from[Александр Петросян <paf@design.ru>]          $.from[Александр Петросян <paf@design.ru>]
         $.to[Александр Петросян <paf@design.ru>]          $.to[Александр Петросян <paf@design.ru>]
Line 1978  $s[abcАБВ] Line 2255  $s[abcАБВ]
                 3]                  3]
 ]  ]
   
 @exec[]  
 $a[^file::exec[fc.exe;;a;b]]  
 $a.status|$a.stderr<hr>  
   
 @fori[][i]  @fori[][i]
 ^for[i](1;3){... =$i= ...}  ^for[i](1;3){... =$i= ...}
   
Line 2001  $xdoc[^xdoc::set{<?xml version="1.0" enc Line 2274  $xdoc[^xdoc::set{<?xml version="1.0" enc
   
 @xdata[]  @xdata[]
 #$response:content-type[$.value[text/html] $.charset[windows-1251]]  #$response:content-type[$.value[text/html] $.charset[windows-1251]]
 $xdoc[^xdoc::set{^process{<?xml version="1.0" encoding="windows-1251"?>  $xdoc[^xdoc::create{<?xml version="1.0" encoding="windows-1251"?>
 <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->  <!--DOCTYPE people SYSTEM "D:\Y\parser3project\parser3\src\www\htdocs\people.dtd"-->
 <people>  <people>
         <man id="1" имя="word слово">          <man id="1" имя="word слово">
Line 2011  $xdoc[^xdoc::set{^process{<?xml version= Line 2284  $xdoc[^xdoc::set{^process{<?xml version=
             <name>ПИФ^taint[&]</name>              <name>ПИФ^taint[&]</name>
                 </man>                  </man>
 </people>  </people>
 }}]  }]
   
 @xml[]  @xml[]
 ^xdata[]  ^xdata[]

Removed from v.1.135  
changed lines
  Added in v.1.166


E-mail: