1 |
|
---|
2 |
|
---|
3 |
|
---|
4 |
|
---|
5 |
|
---|
6 |
|
---|
7 |
|
---|
8 |
|
---|
9 |
|
---|
10 |
|
---|
11 |
|
---|
12 |
|
---|
13 |
|
---|
14 |
|
---|
15 |
|
---|
16 |
|
---|
17 |
|
---|
18 |
|
---|
19 |
|
---|
20 |
package nccoos_page_info; |
---|
21 |
|
---|
22 |
use strict; |
---|
23 |
use warnings; |
---|
24 |
use vars qw(); |
---|
25 |
|
---|
26 |
|
---|
27 |
|
---|
28 |
BEGIN{ |
---|
29 |
use Exporter (); |
---|
30 |
|
---|
31 |
our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); |
---|
32 |
|
---|
33 |
$VERSION="1.0"; |
---|
34 |
|
---|
35 |
@ISA = qw(Exporter); |
---|
36 |
|
---|
37 |
@EXPORT = qw( |
---|
38 |
%page %article |
---|
39 |
); |
---|
40 |
|
---|
41 |
@EXPORT_OK=(); |
---|
42 |
} |
---|
43 |
|
---|
44 |
|
---|
45 |
our(%page,%article |
---|
46 |
); |
---|
47 |
|
---|
48 |
|
---|
49 |
|
---|
50 |
|
---|
51 |
|
---|
52 |
|
---|
53 |
|
---|
54 |
|
---|
55 |
|
---|
56 |
|
---|
57 |
|
---|
58 |
|
---|
59 |
|
---|
60 |
|
---|
61 |
|
---|
62 |
|
---|
63 |
|
---|
64 |
$page{'main'} = Web->new_page(); |
---|
65 |
$page{'main'} -> afs_path ( "" ); |
---|
66 |
$page{'main'} -> path2main ( "" ); |
---|
67 |
$page{'main'} -> file_name ( "index.html" ); |
---|
68 |
$page{'main'} -> short_title ( "Main" ); |
---|
69 |
$page{'main'} -> long_title ( "North Carolina Coastal ". |
---|
70 |
"Ocean Observing System" ); |
---|
71 |
|
---|
72 |
|
---|
73 |
$page{'main'} -> content_files ( "main.txt" ); |
---|
74 |
|
---|
75 |
|
---|
76 |
|
---|
77 |
|
---|
78 |
|
---|
79 |
|
---|
80 |
$page{'plats'} = Web->new_page(); |
---|
81 |
$page{'plats'} -> afs_path ( "plats/" ); |
---|
82 |
$page{'plats'} -> path2main ( "../" ); |
---|
83 |
$page{'plats'} -> file_name ( "index.html" ); |
---|
84 |
$page{'plats'} -> short_title ( "Platforms" ); |
---|
85 |
$page{'plats'} -> long_title ( "Observation Platforms Operated ". |
---|
86 |
"by NC-COOS" ); |
---|
87 |
$page{'plats'} -> menu_items ( 'radar','tower_R4','buoy','jpop','neuse', |
---|
88 |
'roof' ); |
---|
89 |
$page{'plats'} -> menu_type ( "vertical" ); |
---|
90 |
$page{'plats'} -> script_files ( "plats_page.js" ); |
---|
91 |
$page{'plats'} -> content_files ( "plats.txt" ); |
---|
92 |
$page{'plats'} -> articles ( 'radar','tower_R4','buoy','jpop','neuse', |
---|
93 |
'roof' ); |
---|
94 |
|
---|
95 |
|
---|
96 |
|
---|
97 |
|
---|
98 |
|
---|
99 |
$page{'obs'} = Web->new_page(); |
---|
100 |
$page{'obs'} -> afs_path ( "obs/" ); |
---|
101 |
$page{'obs'} -> path2main ( "../" ); |
---|
102 |
$page{'obs'} -> file_name ( "index.html" ); |
---|
103 |
$page{'obs'} -> short_title ( "Merged Maps" ); |
---|
104 |
$page{'obs'} -> long_title ( "Observations of Oceanic and ". |
---|
105 |
"Atmospheric Conditions" ); |
---|
106 |
$page{'obs'} -> menu_items ( 'vel','wind','sst','wl','salin','waves'); |
---|
107 |
$page{'obs'} -> menu_type ( "vertical" ); |
---|
108 |
$page{'obs'} -> script_files ( "obs_page.js" ); |
---|
109 |
|
---|
110 |
$page{'obs'} -> articles ( 'currents','winds','sst','wl'); |
---|
111 |
|
---|
112 |
|
---|
113 |
|
---|
114 |
|
---|
115 |
|
---|
116 |
|
---|
117 |
$page{'mods'} = Web->new_page(); |
---|
118 |
$page{'mods'} -> afs_path ( "mods/" ); |
---|
119 |
$page{'mods'} -> path2main ( "../" ); |
---|
120 |
$page{'mods'} -> file_name ( "index.html" ); |
---|
121 |
$page{'mods'} -> short_title ( "Models" ); |
---|
122 |
$page{'mods'} -> long_title ( "Physical Models of Oceanic and ". |
---|
123 |
"Atmospheric Conditions" ); |
---|
124 |
$page{'mods'} -> menu_items ('adcirc','quoddy','eta'); |
---|
125 |
$page{'mods'} -> menu_type ( "horizontal" ); |
---|
126 |
$page{'mods'} -> content_files ( "mods.txt" ); |
---|
127 |
|
---|
128 |
|
---|
129 |
|
---|
130 |
|
---|
131 |
|
---|
132 |
|
---|
133 |
$page{'data'} = Web->new_page(); |
---|
134 |
$page{'data'} -> afs_path ( "data/" ); |
---|
135 |
$page{'data'} -> path2main ( "../" ); |
---|
136 |
|
---|
137 |
|
---|
138 |
$page{'data'} -> file_name ( "" ); |
---|
139 |
$page{'data'} -> short_title ( "File Access" ); |
---|
140 |
$page{'data'} -> long_title ( "Access to Real-Time Data"); |
---|
141 |
|
---|
142 |
|
---|
143 |
|
---|
144 |
|
---|
145 |
|
---|
146 |
|
---|
147 |
|
---|
148 |
|
---|
149 |
|
---|
150 |
$page{'dods'} = Web->new_page(); |
---|
151 |
$page{'dods'} -> afs_path ( "cgi-bin/nph-dods/data/" ); |
---|
152 |
$page{'dods'} -> path2main ( "../" ); |
---|
153 |
$page{'dods'} -> file_name ( "" ); |
---|
154 |
$page{'dods'} -> short_title ( "DODS Access" ); |
---|
155 |
|
---|
156 |
|
---|
157 |
|
---|
158 |
|
---|
159 |
|
---|
160 |
|
---|
161 |
|
---|
162 |
|
---|
163 |
|
---|
164 |
|
---|
165 |
|
---|
166 |
$page{'radar'} = Web->new_page(); |
---|
167 |
$page{'radar'} -> afs_path ( "plats/radar/" ); |
---|
168 |
$page{'radar'} -> short_title ( "HF Radar" ); |
---|
169 |
$page{'radar'} -> long_title ( "Surface Current Radar" ); |
---|
170 |
$page{'radar'} -> file_name ( "index.html" ); |
---|
171 |
$page{'radar'} -> path2main ( "../../" ); |
---|
172 |
$page{'radar'} -> parent ( "plats" ); |
---|
173 |
$page{'radar'} -> menu_items ( 'radar_comp','radar_pub' ); |
---|
174 |
$page{'radar'} -> content_files ( "radar_1.txt", |
---|
175 |
|
---|
176 |
"technical.txt", |
---|
177 |
"radar_3.txt"); |
---|
178 |
|
---|
179 |
|
---|
180 |
|
---|
181 |
|
---|
182 |
$page{'radar_hist'} = Web->new_page(); |
---|
183 |
$page{'radar_hist'} -> afs_path ( "plats/radar/" ); |
---|
184 |
$page{'radar_hist'} -> short_title ( "HF Radar" ); |
---|
185 |
$page{'radar_hist'} -> long_title ( "Surface Current Radar (Historical)" ); |
---|
186 |
$page{'radar_hist'} -> file_name ( "historical.html" ); |
---|
187 |
$page{'radar_hist'} -> path2main ( "../../" ); |
---|
188 |
$page{'radar_hist'} -> parent ( "plats/radar" ); |
---|
189 |
$page{'radar_hist'} -> content_files ( "radar_1.txt", |
---|
190 |
"radar_3.fix1", |
---|
191 |
"radar_anim_script.txt", |
---|
192 |
"radar_3.fix2", |
---|
193 |
"radar_anim.txt", |
---|
194 |
"radar_3.fix3"); |
---|
195 |
|
---|
196 |
$page{'radar_pub'} = Web->new_page(); |
---|
197 |
$page{'radar_pub'} -> afs_path ( "plats/radar/" ); |
---|
198 |
$page{'radar_pub'} -> short_title ( "Publications" ); |
---|
199 |
$page{'radar_pub'} -> long_title ( "Publications and Presentations" ); |
---|
200 |
$page{'radar_pub'} -> file_name ( "radar_pub.html" ); |
---|
201 |
$page{'radar_pub'} -> path2main ( "../../" ); |
---|
202 |
$page{'radar_pub'} -> parent ( "plats/radar" ); |
---|
203 |
$page{'radar_pub'} -> content_files ( "radar_1.txt","radar_pub.txt" ); |
---|
204 |
|
---|
205 |
$page{'radar_comp'} = Web->new_page(); |
---|
206 |
$page{'radar_comp'} -> afs_path ( "plats/radar/" ); |
---|
207 |
$page{'radar_comp'} -> short_title ( "Compare" ); |
---|
208 |
$page{'radar_comp'} -> long_title ( "Data Comparissons" ); |
---|
209 |
$page{'radar_comp'} -> file_name ( "radar_comp.html" ); |
---|
210 |
$page{'radar_comp'} -> path2main ( "../../" ); |
---|
211 |
$page{'radar_comp'} -> parent ( "plats/radar" ); |
---|
212 |
$page{'radar_comp'} -> content_files ( "radar_1.txt","radar_comp.txt" ); |
---|
213 |
|
---|
214 |
$page{'radar_analysis'} = Web->new_page(); |
---|
215 |
$page{'radar_analysis'} -> afs_path ( "plats/radar/" ); |
---|
216 |
$page{'radar_analysis'} -> short_title ( "Analysis" ); |
---|
217 |
$page{'radar_analysis'} -> long_title ( "Data Analysis" ); |
---|
218 |
$page{'radar_analysis'} -> file_name ( "radar_analysis.html" ); |
---|
219 |
$page{'radar_analysis'} -> path2main ( "../../" ); |
---|
220 |
$page{'radar_analysis'} -> parent ( "plats/radar" ); |
---|
221 |
$page{'radar_analysis'} -> content_files ( "radar_1.txt","radar_analysis.txt" ); |
---|
222 |
|
---|
223 |
$page{'tower_R4'} = Web->new_page(); |
---|
224 |
$page{'tower_R4'} -> afs_path ( "plats/tower_R4/" ); |
---|
225 |
$page{'tower_R4'} -> short_title ( "R4 Tower" ); |
---|
226 |
$page{'tower_R4'} -> long_title ( "Navy Tower R4" ); |
---|
227 |
$page{'tower_R4'} -> file_name ( "index.html" ); |
---|
228 |
$page{'tower_R4'} -> path2main ( "../../" ); |
---|
229 |
$page{'tower_R4'} -> menu_items ( 'tower_R4_sys','tower_R4_pkg' ); |
---|
230 |
$page{'tower_R4'} -> parent ( "plats" ); |
---|
231 |
$page{'tower_R4'} -> content_files ( "tower_R4.txt" ); |
---|
232 |
$page{'tower_R4'} -> dynamic_table ( "contents/tables/tower_r4.txt" ); |
---|
233 |
|
---|
234 |
$page{'tower_R4_sys'} = Web->new_page(); |
---|
235 |
$page{'tower_R4_sys'} -> afs_path ( "plats/tower_R4/" ); |
---|
236 |
$page{'tower_R4_sys'} -> short_title ( "System" ); |
---|
237 |
$page{'tower_R4_sys'} -> long_title ( "System Info" ); |
---|
238 |
$page{'tower_R4_sys'} -> file_name ( "sys_info.html" ); |
---|
239 |
$page{'tower_R4_sys'} -> path2main ( "../../" ); |
---|
240 |
$page{'tower_R4_sys'} -> parent ( "plats/tower_R4" ); |
---|
241 |
$page{'tower_R4_sys'} -> content_files ( "tower_R4.txt" ); |
---|
242 |
$page{'tower_R4_sys'} -> dynamic_table ( "contents/tables/tower_r4_sys.txt" ); |
---|
243 |
|
---|
244 |
|
---|
245 |
|
---|
246 |
|
---|
247 |
|
---|
248 |
|
---|
249 |
|
---|
250 |
|
---|
251 |
|
---|
252 |
|
---|
253 |
|
---|
254 |
|
---|
255 |
|
---|
256 |
|
---|
257 |
|
---|
258 |
|
---|
259 |
|
---|
260 |
|
---|
261 |
|
---|
262 |
|
---|
263 |
|
---|
264 |
$page{'buoy'} = Web->new_page(); |
---|
265 |
$page{'buoy'} -> afs_path ( "plats/buoy/" ); |
---|
266 |
$page{'buoy'} -> short_title ( "Buoy" ); |
---|
267 |
$page{'buoy'} -> long_title ( "Lookout Shoals Research Buoy" ); |
---|
268 |
$page{'buoy'} -> file_name ( "index.html" ); |
---|
269 |
$page{'buoy'} -> path2main ( "../../" ); |
---|
270 |
$page{'buoy'} -> parent ( "plats" ); |
---|
271 |
$page{'buoy'} -> menu_items ( 'buoy_sys','buoy_pkg' ); |
---|
272 |
$page{'buoy'} -> content_files ( "buoy_lsrb.txt"); |
---|
273 |
|
---|
274 |
|
---|
275 |
$page{'buoy'} -> script_files ( "popup.js" ); |
---|
276 |
$page{'buoy'} -> dynamic_table ( "contents/tables/buoy_lsrb.txt"); |
---|
277 |
|
---|
278 |
|
---|
279 |
|
---|
280 |
$page{'buoy_sys'} = Web->new_page(); |
---|
281 |
$page{'buoy_sys'} -> afs_path ( "plats/buoy/" ); |
---|
282 |
$page{'buoy_sys'} -> short_title ( "System" ); |
---|
283 |
$page{'buoy_sys'} -> long_title ( "Buoy System Data" ); |
---|
284 |
$page{'buoy_sys'} -> file_name ( "sys.html" ); |
---|
285 |
$page{'buoy_sys'} -> path2main ( "../../" ); |
---|
286 |
$page{'buoy_sys'} -> parent ( "plats/buoy" ); |
---|
287 |
$page{'buoy_sys'} -> content_files ( "buoy_lsrb.txt" ); |
---|
288 |
$page{'buoy_sys'} -> dynamic_table ( "contents/tables/buoy_lsrb_sys.txt" ); |
---|
289 |
|
---|
290 |
$page{'buoy_pkg'} = Web->new_page(); |
---|
291 |
$page{'buoy_pkg'} -> afs_path ( "plats/buoy/" ); |
---|
292 |
$page{'buoy_pkg'} -> short_title ( "Package" ); |
---|
293 |
$page{'buoy_pkg'} -> long_title ( "Buoy Package Info" ); |
---|
294 |
$page{'buoy_pkg'} -> file_name ( "pkg_test.html" ); |
---|
295 |
$page{'buoy_pkg'} -> path2main ( "../../" ); |
---|
296 |
$page{'buoy_pkg'} -> parent ( "plats/buoy" ); |
---|
297 |
$page{'buoy_pkg'} -> content_files ( "buoy_lsrb.txt", "buoy_pkg.txt" ); |
---|
298 |
|
---|
299 |
|
---|
300 |
$page{'jpop'} = Web->new_page(); |
---|
301 |
$page{'jpop'} -> afs_path ( "plats/jpop/" ); |
---|
302 |
$page{'jpop'} -> short_title ( "JPOP" ); |
---|
303 |
$page{'jpop'} -> long_title ( "Jennette's Pier Observing Partnership" ); |
---|
304 |
$page{'jpop'} -> file_name ( "index.html" ); |
---|
305 |
$page{'jpop'} -> path2main ( "../../" ); |
---|
306 |
$page{'jpop'} -> parent ( "plats" ); |
---|
307 |
$page{'jpop'} -> content_files ( "jpop.txt" ); |
---|
308 |
|
---|
309 |
|
---|
310 |
$page{'neuse'} = Web->new_page(); |
---|
311 |
$page{'neuse'} -> afs_path ( "plats/neuse/" ); |
---|
312 |
$page{'neuse'} -> short_title ( "Neuse" ); |
---|
313 |
$page{'neuse'} -> long_title ( "Neuse River Profiling Station" ); |
---|
314 |
$page{'neuse'} -> file_name ( "index.html" ); |
---|
315 |
$page{'neuse'} -> path2main ( "../../" ); |
---|
316 |
$page{'neuse'} -> parent ( "plats" ); |
---|
317 |
$page{'neuse'} -> content_files ( "neuse.txt" ); |
---|
318 |
|
---|
319 |
|
---|
320 |
$page{'roof'} = Web->new_page(); |
---|
321 |
$page{'roof'} -> afs_path ( "plats/roof/" ); |
---|
322 |
$page{'roof'} -> short_title ( "Roof" ); |
---|
323 |
$page{'roof'} -> long_title ( "Roof Development Package" ); |
---|
324 |
$page{'roof'} -> file_name ( "index.html" ); |
---|
325 |
$page{'roof'} -> path2main ( "../../" ); |
---|
326 |
$page{'roof'} -> parent ( "plats" ); |
---|
327 |
$page{'roof'} -> menu_items ( 'roof_sys','roof_pkg' ); |
---|
328 |
$page{'roof'} -> content_files ( "roof.txt" ); |
---|
329 |
$page{'roof'} -> dynamic_table ( "contents/tables/roof.txt" ); |
---|
330 |
|
---|
331 |
$page{'roof_sys'} = Web->new_page(); |
---|
332 |
$page{'roof_sys'} -> afs_path ( "plats/roof/" ); |
---|
333 |
$page{'roof_sys'} -> short_title ( "System" ); |
---|
334 |
$page{'roof_sys'} -> long_title ( "System Info" ); |
---|
335 |
$page{'roof_sys'} -> file_name ( "sys_info.html" ); |
---|
336 |
$page{'roof_sys'} -> path2main ( "../../" ); |
---|
337 |
$page{'roof_sys'} -> parent ( "plats/roof" ); |
---|
338 |
$page{'roof_sys'} -> content_files ( "roof.txt","roof_sys.txt" ); |
---|
339 |
$page{'roof_sys'} -> dynamic_table ( "contents/tables/roof_sys.txt" ); |
---|
340 |
|
---|
341 |
$page{'roof_pkg'} = Web->new_page(); |
---|
342 |
$page{'roof_pkg'} -> afs_path ( "plats/roof/" ); |
---|
343 |
$page{'roof_pkg'} -> short_title ( "Package" ); |
---|
344 |
$page{'roof_pkg'} -> long_title ( "Package Details" ); |
---|
345 |
$page{'roof_pkg'} -> file_name ( "pkg_info.html" ); |
---|
346 |
$page{'roof_pkg'} -> path2main ( "../../" ); |
---|
347 |
$page{'roof_pkg'} -> parent ( "plats/roof" ); |
---|
348 |
|
---|
349 |
$page{'roof_pkg'} -> content_files ( "roof.txt","roof_pkg.txt" ); |
---|
350 |
|
---|
351 |
$page{'sst'} = Web->new_page(); |
---|
352 |
$page{'sst'} -> afs_path ( "obs/" ); |
---|
353 |
|
---|
354 |
$page{'sst'} -> file_name ( "sst.html" ); |
---|
355 |
$page{'sst'} -> short_title ( "SST" ); |
---|
356 |
$page{'sst'} -> long_title ( "Sea Surface Temperature" ); |
---|
357 |
$page{'sst'} -> parent ( "obs" ); |
---|
358 |
$page{'sst'} -> path2main ( "../" ); |
---|
359 |
$page{'sst'} -> script_files ( "popup.js" ); |
---|
360 |
$page{'sst'} -> image_maps ( "obs_sst.map" ); |
---|
361 |
$page{'sst'} -> content_files ( "sst.txt" ); |
---|
362 |
|
---|
363 |
$page{'wind'} = Web->new_page(); |
---|
364 |
$page{'wind'} -> afs_path ( "obs/" ); |
---|
365 |
|
---|
366 |
$page{'wind'} -> file_name ( "wind.html" ); |
---|
367 |
$page{'wind'} -> short_title ( "Wind" ); |
---|
368 |
$page{'wind'} -> long_title ( "Wind Velocities" ); |
---|
369 |
$page{'wind'} -> parent ( "obs" ); |
---|
370 |
$page{'wind'} -> path2main ( "../" ); |
---|
371 |
$page{'wind'} -> script_files ( "popup.js" ); |
---|
372 |
$page{'wind'} -> image_maps ( "obs_wind.map" ); |
---|
373 |
$page{'wind'} -> content_files ( "wind.txt" ); |
---|
374 |
|
---|
375 |
$page{'vel'} = Web->new_page(); |
---|
376 |
$page{'vel'} -> afs_path ( "obs/" ); |
---|
377 |
|
---|
378 |
$page{'vel'} -> file_name ( "vel.html" ); |
---|
379 |
$page{'vel'} -> short_title ( "Currents" ); |
---|
380 |
$page{'vel'} -> long_title ( "Water Velocities" ); |
---|
381 |
$page{'vel'} -> parent ( "obs" ); |
---|
382 |
$page{'vel'} -> script_files ( "popup.js" ); |
---|
383 |
$page{'vel'} -> image_maps ( "obs_vel.map" ); |
---|
384 |
$page{'vel'} -> path2main ( "../" ); |
---|
385 |
$page{'vel'} -> content_files ( "vel.txt" ); |
---|
386 |
|
---|
387 |
|
---|
388 |
|
---|
389 |
|
---|
390 |
|
---|
391 |
|
---|
392 |
|
---|
393 |
|
---|
394 |
|
---|
395 |
|
---|
396 |
$page{'wl'} = Web->new_page(); |
---|
397 |
$page{'wl'} -> afs_path ( "obs/" ); |
---|
398 |
|
---|
399 |
$page{'wl'} -> file_name ( "wl.html" ); |
---|
400 |
$page{'wl'} -> short_title ( "Water Level" ); |
---|
401 |
$page{'wl'} -> long_title ( "Water Level" ); |
---|
402 |
$page{'wl'} -> path2main ( "../" ); |
---|
403 |
$page{'wl'} -> parent ( "obs" ); |
---|
404 |
$page{'wl'} -> content_files ( "wl.txt" ); |
---|
405 |
|
---|
406 |
$page{'radial'} = Web->new_page(); |
---|
407 |
|
---|
408 |
$page{'radial'} -> afs_path ( "obs/" ); |
---|
409 |
$page{'radial'} -> file_name ( "radial.html" ); |
---|
410 |
$page{'radial'} -> short_title ( "Radials" ); |
---|
411 |
$page{'radial'} -> long_title ( "Radial Surface Velocities" ); |
---|
412 |
$page{'radial'} -> path2main ( "../" ); |
---|
413 |
$page{'radial'} -> parent ( "obs" ); |
---|
414 |
$page{'radial'} -> content_files ( "radial.txt" ); |
---|
415 |
|
---|
416 |
|
---|
417 |
$page{'exper'} = Web->new_page(); |
---|
418 |
$page{'exper'} -> afs_path ( "" ); |
---|
419 |
|
---|
420 |
$page{'exper'} -> short_title ( "Note: Experimental!" ); |
---|
421 |
$page{'exper'} -> path2main ( "../" ); |
---|
422 |
|
---|
423 |
$page{'adcirc'} = Web->new_page(); |
---|
424 |
$page{'adcirc'} -> afs_path ( "mods/adcirc/" ); |
---|
425 |
$page{'adcirc'} -> file_name ( "index.html" ); |
---|
426 |
$page{'adcirc'} -> short_title ( "ADCIRC" ); |
---|
427 |
$page{'adcirc'} -> long_title ( "ADCIRC Tidal and Wind Model" ); |
---|
428 |
$page{'adcirc'} -> path2main ( "../../" ); |
---|
429 |
$page{'adcirc'} -> content_files ( "adcirc.txt" ); |
---|
430 |
|
---|
431 |
$page{'adcirc'} -> parent ( "mods" ); |
---|
432 |
|
---|
433 |
$page{'adcirc_wl'} = Web->new_page(); |
---|
434 |
$page{'adcirc_wl'} -> afs_path ( "mods/adcirc/" ); |
---|
435 |
$page{'adcirc_wl'} -> file_name ( "adcirc_wl.html" ); |
---|
436 |
$page{'adcirc_wl'} -> short_title ( "Water Level" ); |
---|
437 |
$page{'adcirc_wl'} -> long_title ( "ADCIRC Water Level" ); |
---|
438 |
$page{'adcirc_wl'} -> path2main ( "../../" ); |
---|
439 |
$page{'adcirc_wl'} -> content_files ( "adcirc_wl.txt" ); |
---|
440 |
$page{'adcirc_wl'} -> parent ( "mods/adcirc" ); |
---|
441 |
|
---|
442 |
$page{'adcirc_suv'} = Web->new_page(); |
---|
443 |
$page{'adcirc_suv'} -> afs_path ( "mods/adcirc/" ); |
---|
444 |
$page{'adcirc_suv'} -> file_name ( "adcirc_suv.html" ); |
---|
445 |
$page{'adcirc_suv'} -> short_title ( "Currents" ); |
---|
446 |
$page{'adcirc_suv'} -> long_title ( "ADCIRC Surface Currents" ); |
---|
447 |
$page{'adcirc_suv'} -> path2main ( "../../" ); |
---|
448 |
$page{'adcirc_suv'} -> content_files ( "adcirc_suv.txt" ); |
---|
449 |
$page{'adcirc_suv'} -> parent ( "mods/adcirc" ); |
---|
450 |
|
---|
451 |
|
---|
452 |
$page{'quoddy'} = Web->new_page(); |
---|
453 |
$page{'quoddy'} -> afs_path ( "mods/quoddy/" ); |
---|
454 |
$page{'quoddy'} -> file_name ( "index.html" ); |
---|
455 |
$page{'quoddy'} -> short_title ( "QUODDY" ); |
---|
456 |
$page{'quoddy'} -> long_title ( "QUODDY Tidal and Wind Model" ); |
---|
457 |
$page{'quoddy'} -> path2main ( "../../" ); |
---|
458 |
$page{'quoddy'} -> content_files ( "quoddy.txt" ); |
---|
459 |
$page{'quoddy'} -> menu_items ( 'quoddy_sst','quoddy_suv' ); |
---|
460 |
$page{'quoddy'} -> parent ( "mods" ); |
---|
461 |
|
---|
462 |
$page{'quoddy_sst'} = Web->new_page(); |
---|
463 |
$page{'quoddy_sst'} -> afs_path ( "mods/quoddy/" ); |
---|
464 |
$page{'quoddy_sst'} -> file_name ( "quoddy_sst.html" ); |
---|
465 |
$page{'quoddy_sst'} -> short_title ( "SST" ); |
---|
466 |
$page{'quoddy_sst'} -> long_title ( "QUODDY Sea Surface Temperature" ); |
---|
467 |
$page{'quoddy_sst'} -> path2main ( "../../" ); |
---|
468 |
$page{'quoddy_sst'} -> content_files ( "quoddy_sst.txt" ); |
---|
469 |
$page{'quoddy_sst'} -> parent ( "mods/quoddy" ); |
---|
470 |
|
---|
471 |
$page{'quoddy_wl'} = Web->new_page(); |
---|
472 |
$page{'quoddy_wl'} -> afs_path ( "mods/quoddy/" ); |
---|
473 |
$page{'quoddy_wl'} -> file_name ( "quoddy_wl.html" ); |
---|
474 |
$page{'quoddy_wl'} -> short_title ( "Water Level" ); |
---|
475 |
$page{'quoddy_wl'} -> long_title ( "QUODDY Water Level" ); |
---|
476 |
$page{'quoddy_wl'} -> path2main ( "../../" ); |
---|
477 |
$page{'quoddy_wl'} -> content_files ( "quoddy_wl.txt" ); |
---|
478 |
$page{'quoddy_wl'} -> parent ( "mods/quoddy" ); |
---|
479 |
|
---|
480 |
$page{'quoddy_suv'} = Web->new_page(); |
---|
481 |
$page{'quoddy_suv'} -> afs_path ( "mods/quoddy/" ); |
---|
482 |
$page{'quoddy_suv'} -> file_name ( "quoddy_suv.html" ); |
---|
483 |
$page{'quoddy_suv'} -> short_title ( "Currents" ); |
---|
484 |
$page{'quoddy_suv'} -> long_title ( "QUODDY Surface Currents" ); |
---|
485 |
$page{'quoddy_suv'} -> path2main ( "../../" ); |
---|
486 |
$page{'quoddy_suv'} -> content_files ( "quoddy_suv.txt" ); |
---|
487 |
$page{'quoddy_suv'} -> parent ( "mods/quoddy" ); |
---|
488 |
|
---|
489 |
$page{'eta'} = Web->new_page(); |
---|
490 |
$page{'eta'} -> afs_path ( "mods/eta/" ); |
---|
491 |
$page{'eta'} -> file_name ( "index.html" ); |
---|
492 |
$page{'eta'} -> short_title ( "ETA" ); |
---|
493 |
$page{'eta'} -> long_title ( "ETA Atmospheric Model" ); |
---|
494 |
$page{'eta'} -> path2main ( "../../" ); |
---|
495 |
$page{'eta'} -> content_files ( "eta.txt" ); |
---|
496 |
$page{'eta'} -> menu_items ( 'eta_wind','eta_sst' ); |
---|
497 |
$page{'eta'} -> parent ( "mods" ); |
---|
498 |
|
---|
499 |
$page{'eta_wind'} = Web->new_page(); |
---|
500 |
$page{'eta_wind'} -> afs_path ( "mods/eta/" ); |
---|
501 |
$page{'eta_wind'} -> file_name ( "eta_wind.html" ); |
---|
502 |
$page{'eta_wind'} -> short_title ( "Wind" ); |
---|
503 |
$page{'eta_wind'} -> long_title ( "ETA Wind Velocity" ); |
---|
504 |
$page{'eta_wind'} -> path2main ( "../../" ); |
---|
505 |
$page{'eta_wind'} -> content_files ( "eta_wind.txt" ); |
---|
506 |
$page{'eta_wind'} -> parent ( "mods/eta" ); |
---|
507 |
|
---|
508 |
$page{'eta_sst'} = Web->new_page(); |
---|
509 |
$page{'eta_sst'} -> afs_path ( "mods/eta/" ); |
---|
510 |
$page{'eta_sst'} -> file_name ( "eta_sst.html" ); |
---|
511 |
$page{'eta_sst'} -> short_title ( "SST" ); |
---|
512 |
$page{'eta_sst'} -> long_title ( "ETA Sea Surface Temperature" ); |
---|
513 |
$page{'eta_sst'} -> path2main ( "../../" ); |
---|
514 |
$page{'eta_sst'} -> content_files ( "eta_sst.txt" ); |
---|
515 |
$page{'eta_sst'} -> parent ( "mods/eta" ); |
---|
516 |
|
---|
517 |
$page{'blank'} = Web->new_page(); |
---|
518 |
$page{'blank'} -> afs_path ( "" ); |
---|
519 |
$page{'blank'} -> short_title ( '' ); |
---|
520 |
$page{'blank'} -> long_title ( "" ); |
---|
521 |
$page{'blank'} -> path2main ( "" ); |
---|
522 |
|
---|
523 |
|
---|
524 |
|
---|
525 |
|
---|
526 |
|
---|
527 |
|
---|
528 |
|
---|
529 |
|
---|
530 |
|
---|
531 |
|
---|
532 |
|
---|
533 |
|
---|
534 |
|
---|
535 |
|
---|
536 |
|
---|
537 |
|
---|
538 |
|
---|
539 |
$article{'obs'} = Web->new_article(); |
---|
540 |
$article{'obs'} -> short_title ( "Observations" ); |
---|
541 |
$article{'obs'} -> long_title ( "Merged Maps" ); |
---|
542 |
$article{'obs'} -> target_url ( "obs/" ); |
---|
543 |
|
---|
544 |
$article{'obs'} -> thumbnail ( "img/blank_map_thumb.png" ); |
---|
545 |
$article{'obs'} -> content_files ( "obs.txt" ); |
---|
546 |
|
---|
547 |
$article{'currents'} = Web->new_article(); |
---|
548 |
$article{'currents'} -> short_title ( "Currents" ); |
---|
549 |
$article{'currents'} -> long_title ( "Sea Surface Currents" ); |
---|
550 |
|
---|
551 |
$article{'currents'} -> target_url ( "obs/vel.html" ); |
---|
552 |
|
---|
553 |
$article{'currents'} -> thumbnail ( "img/obs/suv_latest_thumb.png" ); |
---|
554 |
$article{'currents'} -> content_files ( "currents.txt" ); |
---|
555 |
|
---|
556 |
$article{'winds'} = Web->new_article(); |
---|
557 |
$article{'winds'} -> short_title ( "Winds" ); |
---|
558 |
$article{'winds'} -> long_title ( "Wind Veolcities" ); |
---|
559 |
$article{'winds'} -> target_url ( "obs/wind.html" ); |
---|
560 |
$article{'winds'} -> thumbnail ( "img/obs/wind_latest_thumb.png" ); |
---|
561 |
$article{'winds'} -> content_files ( "winds.txt" ); |
---|
562 |
|
---|
563 |
$article{'sst'} = Web->new_article(); |
---|
564 |
$article{'sst'} -> short_title ( "SST" ); |
---|
565 |
$article{'sst'} -> long_title ( "Sea Surface Temperature" ); |
---|
566 |
$article{'sst'} -> target_url ( "obs/sst.html" ); |
---|
567 |
$article{'sst'} -> thumbnail ( "img/obs/sst_latest_thumb.png" ); |
---|
568 |
$article{'sst'} -> content_files ( "sst.txt" ); |
---|
569 |
|
---|
570 |
$article{'wl'} = Web->new_article(); |
---|
571 |
$article{'wl'} -> short_title ( "Water Level" ); |
---|
572 |
$article{'wl'} -> long_title ( "Water Level" ); |
---|
573 |
$article{'wl'} -> target_url ( "obs/wl.html" ); |
---|
574 |
|
---|
575 |
$article{'wl'} -> thumbnail ( "img/obs/wl_latest_thumb.png" ); |
---|
576 |
$article{'wl'} -> content_files ( "wl.txt" ); |
---|
577 |
|
---|
578 |
|
---|
579 |
|
---|
580 |
|
---|
581 |
|
---|
582 |
|
---|
583 |
|
---|
584 |
|
---|
585 |
|
---|
586 |
$article{'radial'} = Web->new_article(); |
---|
587 |
$article{'radial'} -> short_title ( "Radials" ); |
---|
588 |
$article{'radial'} -> long_title ( "Surface Current Radial Components " ); |
---|
589 |
$article{'radial'} -> target_url ( "obs/radial.html" ); |
---|
590 |
|
---|
591 |
$article{'radial'} -> thumbnail ( "img/blank_map_thumb.png" ); |
---|
592 |
$article{'radial'} -> content_files ( "radials.txt" ); |
---|
593 |
|
---|
594 |
$article{'radar'} = Web->new_article(); |
---|
595 |
$article{'radar'} -> short_title ( "Radar" ); |
---|
596 |
$article{'radar'} -> long_title ( "Surface Current Radar Observations" ); |
---|
597 |
$article{'radar'} -> target_url ( "plats/radar/" ); |
---|
598 |
|
---|
599 |
$article{'radar'} -> thumbnail ( "img/thumbnails/codar_receive.jpg" ); |
---|
600 |
$article{'radar'} -> content_files ( "radar.txt" ); |
---|
601 |
|
---|
602 |
$article{'tower_R4'} = Web->new_article(); |
---|
603 |
$article{'tower_R4'} -> short_title ( "Tower R4" ); |
---|
604 |
$article{'tower_R4'} -> long_title ( "Tower R4 Package" ); |
---|
605 |
$article{'tower_R4'} -> target_url ( "plats/tower_R4/" ); |
---|
606 |
|
---|
607 |
$article{'tower_R4'} -> thumbnail ( "img/thumbnails/r8_tower.jpg" ); |
---|
608 |
$article{'tower_R4'} -> content_files ( "tower_R4.txt" ); |
---|
609 |
|
---|
610 |
$article{'buoy'} = Web->new_article(); |
---|
611 |
$article{'buoy'} -> short_title ( "Buoy" ); |
---|
612 |
$article{'buoy'} -> long_title ( "Cape Lookout Buoy" ); |
---|
613 |
$article{'buoy'} -> target_url ( "plats/buoy/" ); |
---|
614 |
|
---|
615 |
$article{'buoy'} -> thumbnail ( "img/thumbnails/buoy_unload2.png" ); |
---|
616 |
$article{'buoy'} -> content_files ( "buoy.txt" ); |
---|
617 |
|
---|
618 |
$article{'jpop'} = Web->new_article(); |
---|
619 |
$article{'jpop'} -> short_title ( "Jpop" ); |
---|
620 |
$article{'jpop'} -> long_title ( "Jennette's Pier Observing Partnership" ); |
---|
621 |
$article{'jpop'} -> target_url ( "plats/jpop/" ); |
---|
622 |
|
---|
623 |
$article{'jpop'} -> thumbnail ( "img/thumbnails/jpier_thumb.png" ); |
---|
624 |
$article{'jpop'} -> content_files ( "jpop.txt" ); |
---|
625 |
|
---|
626 |
$article{'neuse'} = Web->new_article(); |
---|
627 |
$article{'neuse'} -> short_title ( "Neuse" ); |
---|
628 |
$article{'neuse'} -> long_title ( "Neuse River Profiler" ); |
---|
629 |
$article{'neuse'} -> target_url ( "plats/neuse/" ); |
---|
630 |
|
---|
631 |
$article{'neuse'} -> thumbnail ( "img/thumbnails/neuse_platform2.png" ); |
---|
632 |
$article{'neuse'} -> content_files ( "neuse.txt" ); |
---|
633 |
|
---|
634 |
$article{'roof'} = Web->new_article(); |
---|
635 |
$article{'roof'} -> short_title ( "Development" ); |
---|
636 |
$article{'roof'} -> long_title ( "Development Package for Towers and Buoys" ); |
---|
637 |
$article{'roof'} -> target_url ( "plats/roof/" ); |
---|
638 |
|
---|
639 |
$article{'roof'} -> thumbnail ( "img/thumbnails/roof_pkg.jpg" ); |
---|
640 |
$article{'roof'} -> content_files ( "roof.txt" ); |
---|
641 |
|
---|
642 |
$article{'roof_daq'} = Web->new_article(); |
---|
643 |
$article{'roof_daq'} -> short_title ( "DAQ" ); |
---|
644 |
$article{'roof_daq'} -> long_title ( "Data Acquisition Package" ); |
---|
645 |
|
---|
646 |
|
---|
647 |
|
---|
648 |
$article{'roof_daq'} -> content_files ( "roof_daq.txt" ); |
---|
649 |
|
---|
650 |
$article{'roof_com'} = Web->new_article(); |
---|
651 |
$article{'roof_com'} -> short_title ( "ComLib" ); |
---|
652 |
$article{'roof_com'} -> long_title ( "Communications Library" ); |
---|
653 |
|
---|
654 |
|
---|
655 |
|
---|
656 |
$article{'roof_com'} -> content_files ( "roof_com.txt" ); |
---|
657 |
|
---|
658 |
$article{'roof_trans'} = Web->new_article(); |
---|
659 |
$article{'roof_trans'} -> short_title ( "Transfer" ); |
---|
660 |
$article{'roof_trans'} -> long_title ( "Data Transfer Package" ); |
---|
661 |
|
---|
662 |
|
---|
663 |
|
---|
664 |
$article{'roof_trans'} -> content_files ( "roof_trans.txt" ); |
---|
665 |
|
---|
666 |
|
---|