|
|
| version 1.176, 2002/10/31 16:08:31 | version 1.178, 2002/11/22 16:16:34 |
|---|---|
| Line 6 | Line 6 |
| $selffilespec[$filespec] | $selffilespec[$filespec] |
| #$form:here | #$form:here |
| #$request:charset[UTF-8] | #$request:charset[UTF-8] |
| ##$request:charset[windows-1251] | $request:charset[windows-1251] |
| ##$response:charset[windows-1251] | $response:charset[windows-1251] |
| #$response:charset[UTF-8] | #$response:charset[UTF-8] |
| #$response:charset[empty] | #$response:charset[empty] |
| #$response:content-type[$.value[text/html]$.charset[$response:charset]] | #$response:content-type[$.value[text/html]$.charset[$response:charset]] |
| Line 290 OK | Line 290 OK |
| #^emailhead2[] | #^emailhead2[] |
| #^includet2overridedynamic[] | #^includet2overridedynamic[] |
| #^includet2overridestatic[] | #^includet2overridestatic[] |
| ^virtualtest2[] | #^virtualtest2[] |
| #^message-id-test[] | |
| ^test_exif[jpg] | |
| @test_exif[dir] | |
| $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]] | |
| <table border=1> | |
| ^file.menu{ | |
| <tr valign=top> | |
| $image[^image::measure[$dir/$file.name]] | |
| <td>^image.html[$.width(100)$.height(100)]</td> | |
| <td> | |
| $file.name<hr> | |
| $exif[$image.exif] | |
| ^if($exif){ | |
| $keys[^exif._keys[]] ^keys.sort{$keys.key} | |
| ^keys.menu{ | |
| $key[$keys.key] | |
| $value[$exif.$key] | |
| ${key}: <b>^show_exif_value[$value]</b><br> | |
| } | |
| }{ | |
| no EXIF info<br> | |
| } | |
| </td> | |
| </tr> | |
| } | |
| </table> | |
| @show_exif_value[value][i] | |
| ^if($value is hash){ | |
| ^for[i](0;$value-1){$value.$i}[,] | |
| }{ | |
| $value | |
| } | |
| @message-id-test[] | |
| ^mail:send[ | |
| $.from[paf@mail] | |
| $.to[paf@mail] | |
| $.subject[test] | |
| # $.message-id[<1@parser.ru>] | |
| $.Message-id[<2@parser.ru>] | |
| $.subject[проверка] | |
| $.text[мычит!] | |
| ] | |
| @virtualtest2[] | @virtualtest2[] |
| $derived[^derived::create[]] | $derived[^derived::create[]] |