Changes To Cookbook
Not logged in
Home Timeline DownloadDocumentationBranches Tags Tickets Login
Next Previous

Changes to "Cookbook" between 2009-11-06 04:05:14 and 2009-11-06 04:09:03

︙
64
65
66
67
68
69
70
71

72
73
74

75
76
77

78
79
80
81
82
83
84
85

86
87
88

89
90

91
92

93
94
95
96

97
98
99
100
101
102
103
104

64
65
66
67
68
69
70

71



72



73

74
75
76
77
78
79

80

81

82


83


84


85

86

87
88
89
90
91
92
93








-
+
-
-
-
+
-
-
-
+
-






-
+
-

-
+
-
-
+
-
-
+
-
-

-
+
-








</font></nowiki>

Here is a little perl script to put in your cgi-bin to list all the fossils you are publishing:

<nowiki>
<pre>
<font color="#a52a2a">&nbsp;1 </font> #!/usr/bin/perl -w
<font color="#a52a2a">&nbsp;2 </font> <font color="#8B008B"><b>my</b></font> <font color="#00688B">$C\
<font color="#a52a2a">&nbsp;2 </font> <font color="#8B008B"><b>my</b></font> <font color="#00688B">$CGI_BIN</font> = <font color="#CD5555">&#39;/Library/WebServer/CGI-Executables&#39;</font><font color="#000000">;</font>
GI_BIN</font> = <font color="#CD5555">&#39;/Library/WebServer/CGI-Executables&#39;</font><font color=\
"#000000">;</font>
<font color="#a52a2a">&nbsp;3 </font> <font color="#8B008B"><b>my</b></font> <font color="#00688B">@f\
<font color="#a52a2a">&nbsp;3 </font> <font color="#8B008B"><b>my</b></font> <font color="#00688B">@files</font> = <font color="#CD5555">`grep -l repository:  $CGI_BIN/* `</font><font color="#000000">;</font>
iles</font> = <font color="#CD5555">`grep -l repository:  $CGI_BIN/* `</font><font color="#000000">;<\
/font>
<font color="#a52a2a">&nbsp;4 </font> <font color="#8B008B"><b>print</b></font> <font color="#CD5555"\
<font color="#a52a2a">&nbsp;4 </font> <font color="#8B008B"><b>print</b></font> <font color="#CD5555"><b>&lt;&lt;EOM</b></font><font color="#000000">;</font>
><b>&lt;&lt;EOM</b></font><font color="#000000">;</font>
<font color="#a52a2a">&nbsp;5 </font> <font color="#CD5555"><i>Content-Type: text/html</i></font>
<font color="#a52a2a">&nbsp;6 </font>
<font color="#a52a2a">&nbsp;7 </font> <font color="#CD5555"><i>Fossils for this server</i></font>
<font color="#a52a2a">&nbsp;8 </font> <font color="#CD5555"><i>&lt;ul&gt;</i></font>
<font color="#a52a2a">&nbsp;9 </font> <font color="#CD5555"><b>EOM</b></font>
<font color="#a52a2a">&nbsp;1 </font>0
<font color="#a52a2a">&nbsp;1 </font>1 <font color="#8B008B"><b>for</b></font> <font color="#000000">\
<font color="#a52a2a">&nbsp;1 </font>1 <font color="#8B008B"><b>for</b></font> <font color="#000000">(</font><font color="#00688B">@files</font><font color="#000000">)</font> <font color="#000000">{</fo\
(</font><font color="#00688B">@files</font><font color="#000000">)</font> <font color="#000000">{</fo\
nt>
<font color="#a52a2a">&nbsp;1 </font>2   <font color="#CD5555">s{.*/}{}</font><font color="#000000">;\
<font color="#a52a2a">&nbsp;1 </font>2   <font color="#CD5555">s{.*/}{}</font><font color="#000000">;</font>
</font>
<font color="#a52a2a">&nbsp;1 </font>3   <font color="#8B008B"><b>next</b></font> <font color="#8B008\
<font color="#a52a2a">&nbsp;1 </font>3   <font color="#8B008B"><b>next</b></font> <font color="#8B008B"><b>if</b></font> <font color="#CD5555">/~$/</font><font color="#000000">;</font>
B"><b>if</b></font> <font color="#CD5555">/~$/</font><font color="#000000">;</font>
<font color="#a52a2a">&nbsp;1 </font>4   <font color="#8B008B"><b>print</b></font> <font color="#CD55\
<font color="#a52a2a">&nbsp;1 </font>4   <font color="#8B008B"><b>print</b></font> <font color="#CD5555">&quot;&lt;li&gt;&lt;a href=&#39;$_&#39;&gt;$_&lt;/a&gt;&lt;/li&gt;\n&quot;</font><font color="#000000">;</font>
55">&quot;&lt;li&gt;&lt;a href=&#39;$_&#39;&gt;$_&lt;/a&gt;&lt;/li&gt;\n&quot;</font><font color="#00\
0000">;</font>
<font color="#a52a2a">&nbsp;1 </font>5 <font color="#000000">}</font>
<font color="#a52a2a">&nbsp;1 </font>6 <font color="#8B008B"><b>print</b></font> <font color="#CD5555\
<font color="#a52a2a">&nbsp;1 </font>6 <font color="#8B008B"><b>print</b></font> <font color="#CD5555">&quot;&lt;/ul&gt;\n&quot;</font><font color="#000000">;</font>
">&quot;&lt;/ul&gt;\n&quot;</font><font color="#000000">;</font>
</pre>

<pre>
#!/usr/bin/perl -w
my $CGI_BIN = '/Library/WebServer/CGI-Executables';
my @files = `grep -l repository:  $CGI_BIN/* `;
print &lt;&lt;EOM;
︙
This page was generated in about 0.024s by Fossil version [1205ec86cb] 2025-04-30 16:57:32