Return to 096.html CVS log

Up to [parser3project] / parser3 / tests

Annotation of parser3/tests/096.html, revision 1.1.2.1

1.1.2.1 ! paf         1: @main[]
        !             2: ^test_exif[096_dir]
        !             3: 
        !             4: @test_exif[dir]
        !             5: $file[^file:list[$dir;\.(jpe?g|JPE?G)^$]]
        !             6: <table border=1>
        !             7: ^file.menu{
        !             8: <tr valign=top>
        !             9:        $image[^image::measure[$dir/$file.name]]
        !            10:        <td>^image.html[$.width(100)$.height(100)]</td>
        !            11:        <td>
        !            12:                $file.name<hr>
        !            13:        $exif[$image.exif]
        !            14:        ^if($exif){
        !            15:                $keys[^exif._keys[]] ^keys.sort{$keys.key}
        !            16:                ^keys.menu{
        !            17:                        $key[$keys.key]
        !            18:                        $value[$exif.$key]
        !            19: 
        !            20:                        ${key}: <b>^show_exif_value[$value]</b><br>
        !            21:                }
        !            22:        }{
        !            23:                no EXIF info<br>
        !            24:        }
        !            25:     </td>
        !            26: </tr>
        !            27: }
        !            28: </table>
        !            29: 
        !            30: @show_exif_value[value][i]
        !            31: ^if($value is date){
        !            32:        ^value.sql-string[]
        !            33: }{
        !            34:        ^if($value is hash){
        !            35:                ^for[i](0;$value-1){$value.$i}[,]
        !            36:        }{
        !            37:                $value
        !            38:        }
        !            39: }