--- parser3/src/www/htdocs/Attic/index.html 2001/04/07 15:34:59 1.122
+++ parser3/src/www/htdocs/Attic/index.html 2001/04/11 07:44:19 1.134
@@ -31,7 +31,52 @@ $n
$m ^if(^s.match[$:m;i]){matches}{does not match} $s
@main[]
-
^mail:send[ +$form:a +-
+^if($form:photo){ +upload file:
+$face[^image:measure[$form:photo]] +^$face.src=$face.src
+^$face.width=$face.width
+^$face.height=$face.height
+
+} +gif file class:
+$face[^image:measure[^file:load[001004paf(c)lena_karin.gif]]] +^$face.src=$face.src
+^$face.width=$face.width
+^$face.height=$face.height
+^^face.html[]=^face.html[]
+
+gif:
+$face[^image:measure[001004paf(c)lena_karin.gif]] +^$face.src=$face.src
+^$face.width=$face.width
+^$face.height=$face.height
+^^face.html[]=^face.html[]
+
+jpeg:
+$face[^image:measure[001004paf(c)lena_karin.jpg]] +^$face.src=$face.src
+^$face.width=$face.width
+^$face.height=$face.height
+^^face.html[^$border(1) ^$ismap(-1)]=^face.html[$border(1) $ismap(-1)] +
+ +^rem{ +^mail:send[ + $to[paf@design.ru] + $subject[test] + $body[test] +] +
+} + +$e[^file:cgi[env.pl;$t[1]]] +$e.text +
+ +^rem{^mail:send[ $to[paf@design.ru] $from[paf@design.ru] $body[ @@ -47,13 +92,13 @@ PAF ] ] $attach[ - $value[test] + $value[^file:load[test.zip]] $type[uue] - $file-name[te st.txt] + $file-name[retest.zip] ] ] -]