NCCOOS Trac Projects: Top | Web | Platforms | Processing | Viz | Sprints | Sandbox | (Wind)

root/tower_buoy/bin/meta_data/nccoos_page_info.pm

Revision 7 (checked in by cbc, 18 years ago)

--

Line 
1 #meta_data.pm
2 #Time-stamp: <2006-06-26 11:44:28 lstearns>
3 #
4 #Abstract: This module will read in tables of tower related meta data
5 #  and output hash arrays of the information based on param id.  Hacked
6 #  together from the subroutine in tower_parse.perl and perl_defs.pm,
7 #  a piece of code from Brian Blanton (Thanks Brian!!).
8
9 # perl defs and subroutines common to quoddy nc/fc runs
10 # v11/07/2001 B.O.B.
11 # v02/09/2002 B.O.B. to work out of dmf
12 # v06/04/2002 B.O.B. added initial da stuff
13 # v19/08/2002 B.O.B. fixes for changes to "edu" from "com"
14 # v13/09/2002 B.O.B. added truxton stuff
15 # v13/12/2002 B.O.B. version for casco4b inclusion/ ssh assim
16 # vxx/09/2003 B.O.B. modified for SEACOOS
17 # v15/02/2004 B.O.B. turned into perl package provider (seacoos_sab_defs)
18
19
20 package nccoos_page_info;  # assumes seacoos_sab_defs.pm
21
22 use strict;
23 use warnings;
24 use vars qw();
25 #use lib '/opt/local/seacoos/bin/';
26 #use Web_dev;
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 #my(
49 #  );
50
51
52
53
54
55 ######################################################################
56 # Enter Page Data
57 ######################################################################
58
59
60 ######################################################################
61 ## Main Page ## ~/index.html ##
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 #$page{'main'} -> menu_items   ( 'main','obs','mods','data' );
72 #$page{'main'} -> menu_type    ( "vertical"  );
73 $page{'main'} -> content_files ( "main.txt" );
74
75
76 ######################################################################
77 ## Platforms Main Page ## ~/obs/index.html ##
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 ## Observations Main Page ## ~/obs/index.html ##
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 #$page{'obs'} -> content_files ( "obs.txt" );
110 $page{'obs'} -> articles     ( 'currents','winds','sst','wl');
111
112
113 ######################################################################
114 ## Modeling Main Page ## ~/mods/index.html ##
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 ## Data Access Main Page ## ~/data/index.html ##
131 ######################################################################
132
133 $page{'data'} = Web->new_page();
134 $page{'data'} -> afs_path     ( "data/" );
135 $page{'data'} -> path2main    ( "../" );
136 #$page{'data'} -> file_name    ( "data_access.html" );
137 #$page{'data'} -> file_name    ( "file_access.html" );
138 $page{'data'} -> file_name ( "" );
139 $page{'data'} -> short_title  ( "File Access" );
140 $page{'data'} -> long_title   ( "Access to Real-Time Data");
141 #$page{'data'} -> menu_items   ( 'latest');#,'d_obs','d_mods');
142 #$page{'data'} -> menu_type    ( "vertical" );
143 #$page{'data'} -> content_files ( "data_access.txt" );
144 #$page{'data'} -> content_files ( "file_access.txt" );
145
146 ######################################################################
147 ## Data Access Main Page ## ~/cgi-bin/nph-dods/data/ ##
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 #$page{'dods'} -> long_title   ( "Access to Real-Time Data");
156 #$page{'dods'} -> menu_items   ( 'latest');#,'d_obs','d_mods');
157 #$page{'dods'} -> menu_type    ( "vertical" );
158 #$page{'dods'} -> content_files ( "contents/dods_page.txt" );
159
160
161
162 ######################################################################
163 ## Menu Entries ######################################################
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                                     #"radar_2.txt",
176                                     "technical.txt",
177                                     "radar_3.txt");
178                                     #"radar_4.txt");
179 #$page{'radar'} -> dynamic_table   ( "contents/tables/codar_suv.txt" );
180 #$page{'radar'} -> script_files    ( 'loc_data.js' );
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 #$page{'tower_R4_pkg'} = Web->new_page();
245 #$page{'tower_R4_pkg'} -> afs_path        ( "plats/tower_R4/" );
246 #$page{'tower_R4_pkg'} -> short_title     ( "Package" );
247 #$page{'tower_R4_pkg'} -> long_title      ( "Package Details" );
248 #$page{'tower_R4_pkg'} -> file_name       ( "pkg_info.html" );
249 #$page{'tower_R4_pkg'} -> path2main       ( "../../" );
250 #$page{'tower_R4_pkg'} -> parent          ( "plats/tower_R4" );
251 #$page{'tower_R4_pkg'} -> content_files   ( "tower_R4.txt","tower_R4_pkg.txt" );
252
253
254 #This page will be replaced by the contents of buoy_data
255 #$page{'buoy'} = Web->new_page();
256 #$page{'buoy'} -> afs_path        ( "plats/buoy/" );
257 #$page{'buoy'} -> short_title     ( "Buoy" );
258 #$page{'buoy'} -> long_title      ( "Cape Lookout Buoy" );
259 #$page{'buoy'} -> file_name       ( "index.html" );
260 #$page{'buoy'} -> path2main       ( "../../" );
261 #$page{'buoy'} -> parent          ( "plats" );
262 #$page{'buoy'} -> content_files   ( "buoy.txt" );
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                                    #"buoy_down.txt" );
274                                    #"technical.txt" );
275 $page{'buoy'} -> script_files ( "popup.js" );
276 $page{'buoy'} -> dynamic_table   ( "contents/tables/buoy_lsrb.txt");
277                                    #"contents/tables/buoy_lsrb_surf.txt",
278                                    #"contents/tables/buoy_lsrb_midw.txt");
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 #$page{'roof_pkg'} -> articles       ( 'roof_daq','roof_com','roof_trans' );
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 #$page{'sst'} -> on_mouseover   ('sst_v_w.png');
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 #$page{'wind'} -> on_mouseover  ( 'wind_v.png' );
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 #$page{'vel'} -> on_mouseover   ('vel.png');
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 #$page{'salin'} = Web->new_page();
388 #$page{'salin'} -> afs_path        ( "obs/" );
389 #$page{'salin'} -> on_mouseover    ('salin_v_w.png');
390 #$page{'salin'} -> file_name       ( "salin.html" );
391 #$page{'salin'} -> short_title     ( "Salinity" );
392 #$page{'salin'} -> path2main       ( "../" );
393 #$page{'salin'} -> parent          ( "obs" );
394
395
396 $page{'wl'} = Web->new_page();
397 $page{'wl'} -> afs_path       ( "obs/" );
398 #$page{'wl'} -> on_mouseover  ('wl_v_w.png');
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 #$page{'radial'} -> on_mouseover  ('radial.png');
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 #$page{'exper'} -> file_name      ( "" );
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 #$page{'adcirc'} -> menu_items     ( 'adcirc_wl','adcirc_suv' );
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 #$page{'hycom'} = Web->new_page();
526 #$page{'hycom'} -> afs_path       ( "mods/" );
527 #$page{'hycom'} -> file_name      ( "hycom.html" );
528 #$page{'hycom'} -> short_title     ( "HYCOM" );
529 #$page{'hycom'} -> path2main      ( "../" );
530
531
532 #$page{'latest'} = Web->new_page();
533 #$page{'latest'} -> afs_path       ( "data/" );
534 #$page{'latest'} -> file_name      ( "latest_v2.0" );
535 #$page{'latest'} -> short_title     ( "Latest Real-Time Data" );
536 #$page{'latest'} -> path2main      ( "../" );
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 #$article{'obs'} -> thumbnail       ( "obs_thumb.png" );
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 #$article{'currents'} -> target_url      ( "img/rt/vel.png" );
551 $article{'currents'} -> target_url ( "obs/vel.html" );
552 #$article{'currents'} -> thumbnail       ( "obs_thumb.png" );
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 #$article{'wl'} -> thumbnail       ( "wl_thumb.png" );
575 $article{'wl'} -> thumbnail ( "img/obs/wl_latest_thumb.png" );
576 $article{'wl'} -> content_files    ( "wl.txt" );
577
578 #$article{'salin'} = Web->new_article();
579 #$article{'salin'} -> short_title     ( "Salinity" );
580 #$article{'salin'} -> long_title      ( "Surface Salinity" );
581 #$article{'salin'} -> target_url      ( "obs/salin.html" );
582 #$article{'salin'} -> thumbnail       ( "salin_thumb.png" );
583 #$article{'salin'} -> thumbnail       ( "example.png" );
584 #$article{'salin'} -> content_files    ( "salin.txt" );
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 #$article{'radial'} -> thumbnail       ( "radial_thumb.png" );
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 #$article{'radar'} -> thumbnail       ( "radar_thumb.png" );
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 #$article{'tower_R4'} -> thumbnail       ( "tower_R4_thumb.png" );
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 #$article{'buoy'} -> thumbnail       ( "buoy_thumb.png" );
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 #$article{'jpop'} -> thumbnail       ( "jpop_thumb.png" );
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 #$article{'neuse'} -> thumbnail       ( "neuse_thumb.png" );
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 #$article{'roof'} -> thumbnail       ( "roof_thumb.png" );
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 #$article{'roof_daq'} -> target_url      ( "plats/roof/" );
646 #$article{'roof'} -> thumbnail       ( "roof_thumb.png" );
647 #$article{'roof_daq'} -> thumbnail       ( "roof_pkg.jpg" );
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 #$article{'roof_com'} -> target_url      ( "plats/roof/" );
654 #$article{'roof'} -> thumbnail       ( "roof_thumb.png" );
655 #$article{'roof_com'} -> thumbnail       ( "roof_pkg.jpg" );
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 #$article{'roof_trans'} -> target_url      ( "plats/roof/" );
662 #$article{'roof'} -> thumbnail       ( "roof_thumb.png" );
663 #$article{'roof_trans'} -> thumbnail       ( "roof_pkg.jpg" );
664 $article{'roof_trans'} -> content_files ( "roof_trans.txt" );
665  
666
Note: See TracBrowser for help on using the browser.