bagder: curl-www curl.pm,1.8,1.9

Update of /cvsroot/curl/curl-www
In directory labb.contactor.se:/var/tmp/cvs-serv27273

Modified Files:
	curl.pm 
Log Message:
footer func


Index: curl.pm
===================================================================
RCS file: /cvsroot/curl/curl-www/curl.pm,v
retrieving revision 1.8
retrieving revision 1.9
diff -u -b -r1.8 -r1.9
--- curl.pm	4 Oct 2004 07:11:56 -0000	1.8
+++ curl.pm	16 Oct 2004 19:15:53 -0000	1.9
@@ -74,4 +74,12 @@
     close(HEAD);
 }
 
+sub footer {
+    open(FOOT, "<$root/foot.html");
+    while(<FOOT>) {
+        print $_;
+    }
+    close(FOOT);
+}
+
 1;

_______________________________________________
http://cool.haxx.se/mailman/listinfo/curl-www-commits