#meta_data.pm #Time-stamp: <2006-06-26 15:08:03 lstearns> # #Abstract: This module will read in tables of tower related meta data # and output hash arrays of the information based on param id. Hacked # together from the subroutine in tower_parse.perl and perl_defs.pm, # a piece of code from Brian Blanton (Thanks Brian!!). # perl defs and subroutines common to quoddy nc/fc runs # v11/07/2001 B.O.B. # v02/09/2002 B.O.B. to work out of dmf # v06/04/2002 B.O.B. added initial da stuff # v19/08/2002 B.O.B. fixes for changes to "edu" from "com" # v13/09/2002 B.O.B. added truxton stuff # v13/12/2002 B.O.B. version for casco4b inclusion/ ssh assim # vxx/09/2003 B.O.B. modified for SEACOOS # v15/02/2004 B.O.B. turned into perl package provider (seacoos_sab_defs) package nccoos_page_info; # assumes seacoos_sab_defs.pm use strict; use warnings; use vars qw(); #use lib '/opt/local/seacoos/bin/'; #use Web_dev; BEGIN{ use Exporter (); our($VERSION, @ISA, @EXPORT, @EXPORT_OK, %EXPORT_TAGS); $VERSION="1.0"; @ISA = qw(Exporter); @EXPORT = qw( %page %article ); @EXPORT_OK=(); } our(%page,%article ); #my( # ); ###################################################################### # Enter Page Data ###################################################################### ###################################################################### ## Main Page ## ~/index.html ## ###################################################################### #$page{'main'} = Web->new_page(); #$page{'main'} -> afs_path ( "" ); #$page{'main'} -> path2main ( "" ); #$page{'main'} -> file_name ( "index.html" ); #$page{'main'} -> short_title ( "Main" ); #$page{'main'} -> long_title ( "North Carolina Coastal ". "Ocean Observing System" ); ##$page{'main'} -> menu_items ( 'main','obs','mods','data' ); ##$page{'main'} -> menu_type ( "vertical" ); #$page{'main'} -> content_files ( "main.txt" ); ###################################################################### ## Platforms Main Page ## ~/obs/index.html ## ###################################################################### #$page{'plats'} = Web->new_page(); #$page{'plats'} -> afs_path ( "plats/" ); #$page{'plats'} -> path2main ( "../" ); #$page{'plats'} -> file_name ( "index.html" ); #$page{'plats'} -> short_title ( "Platforms" ); #$page{'plats'} -> long_title ( "Observation Platforms Operated ". "by NC-COOS" ); #$page{'plats'} -> menu_items ( 'radar','tower_R4','buoy','jpop','neuse', 'roof' ); #$page{'plats'} -> menu_type ( "vertical" ); #$page{'plats'} -> script_files ( "plats_page.js" ); #$page{'plats'} -> content_files ( "plats.txt" ); #$page{'plats'} -> articles ( 'radar','tower_R4','buoy','jpop','neuse', 'roof' ); ###################################################################### ## Observations Main Page ## ~/obs/index.html ## ###################################################################### #$page{'obs'} = Web->new_page(); #$page{'obs'} -> afs_path ( "obs/" ); #$page{'obs'} -> path2main ( "../" ); #$page{'obs'} -> file_name ( "index.html" ); #$page{'obs'} -> short_title ( "Merged Maps" ); #$page{'obs'} -> long_title ( "Observations of Oceanic and ". "Atmospheric Conditions" ); #$page{'obs'} -> menu_items ( 'vel','wind','sst','wl','salin','waves'); #$page{'obs'} -> menu_type ( "vertical" ); #$page{'obs'} -> script_files ( "obs_page.js" ); ##$page{'obs'} -> content_files ( "obs.txt" ); #$page{'obs'} -> articles ( 'currents','winds','sst','wl'); ###################################################################### ## Modeling Main Page ## ~/mods/index.html ## ###################################################################### #$page{'mods'} = Web->new_page(); #$page{'mods'} -> afs_path ( "mods/" ); #$page{'mods'} -> path2main ( "../" ); #$page{'mods'} -> file_name ( "index.html" ); #$page{'mods'} -> short_title ( "Models" ); #$page{'mods'} -> long_title ( "Physical Models of Oceanic and ". "Atmospheric Conditions" ); #$page{'mods'} -> menu_items ('adcirc','quoddy','eta'); #$page{'mods'} -> menu_type ( "horizontal" ); #$page{'mods'} -> content_files ( "mods.txt" ); ###################################################################### ## Data Access Main Page ## ~/data/index.html ## ###################################################################### #$page{'data'} = Web->new_page(); #$page{'data'} -> afs_path ( "data/" ); #$page{'data'} -> path2main ( "../" ); ##$page{'data'} -> file_name ( "data_access.html" ); ##$page{'data'} -> file_name ( "file_access.html" ); #$page{'data'} -> file_name ( "" ); #$page{'data'} -> short_title ( "File Access" ); #$page{'data'} -> long_title ( "Access to Real-Time Data"); ##$page{'data'} -> menu_items ( 'latest');#,'d_obs','d_mods'); ##$page{'data'} -> menu_type ( "vertical" ); ##$page{'data'} -> content_files ( "data_access.txt" ); ##$page{'data'} -> content_files ( "file_access.txt" ); ###################################################################### ## Data Access Main Page ## ~/cgi-bin/nph-dods/data/ ## ###################################################################### #$page{'dods'} = Web->new_page(); #$page{'dods'} -> afs_path ( "cgi-bin/nph-dods/data/" ); #$page{'dods'} -> path2main ( "../" ); #$page{'dods'} -> file_name ( "" ); #$page{'dods'} -> short_title ( "DODS Access" ); ##$page{'dods'} -> long_title ( "Access to Real-Time Data"); ##$page{'dods'} -> menu_items ( 'latest');#,'d_obs','d_mods'); ##$page{'dods'} -> menu_type ( "vertical" ); ##$page{'dods'} -> content_files ( "contents/dods_page.txt" ); ###################################################################### ## Menu Entries ###################################################### ###################################################################### #$page{'radar'} = Web->new_page(); #$page{'radar'} -> afs_path ( "plats/radar/" ); #$page{'radar'} -> short_title ( "HF Radar" ); #$page{'radar'} -> long_title ( "Surface Current Radar" ); #$page{'radar'} -> file_name ( "index.html" ); #$page{'radar'} -> path2main ( "../../" ); #$page{'radar'} -> parent ( "plats" ); #$page{'radar'} -> menu_items ( 'radar_comp','radar_pub' ); #$page{'radar'} -> content_files ( "radar_1.txt", #"radar_2.txt", "technical.txt", "radar_3.txt"); #"radar_4.txt"); ##$page{'radar'} -> dynamic_table ( "contents/tables/codar_suv.txt" ); ##$page{'radar'} -> script_files ( 'loc_data.js' ); #$page{'radar_hist'} = Web->new_page(); #$page{'radar_hist'} -> afs_path ( "plats/radar/" ); #$page{'radar_hist'} -> short_title ( "HF Radar" ); #$page{'radar_hist'} -> long_title ( "Surface Current Radar (Historical)" ); #$page{'radar_hist'} -> file_name ( "historical.html" ); #$page{'radar_hist'} -> path2main ( "../../" ); #$page{'radar_hist'} -> parent ( "plats/radar" ); #$page{'radar_hist'} -> content_files ( "radar_1.txt", "radar_3.fix1", "radar_anim_script.txt", "radar_3.fix2", "radar_anim.txt", "radar_3.fix3"); #$page{'radar_pub'} = Web->new_page(); #$page{'radar_pub'} -> afs_path ( "plats/radar/" ); #$page{'radar_pub'} -> short_title ( "Publications" ); #$page{'radar_pub'} -> long_title ( "Publications and Presentations" ); #$page{'radar_pub'} -> file_name ( "radar_pub.html" ); #$page{'radar_pub'} -> path2main ( "../../" ); #$page{'radar_pub'} -> parent ( "plats/radar" ); #$page{'radar_pub'} -> content_files ( "radar_1.txt","radar_pub.txt" ); #$page{'radar_comp'} = Web->new_page(); #$page{'radar_comp'} -> afs_path ( "plats/radar/" ); #$page{'radar_comp'} -> short_title ( "Compare" ); #$page{'radar_comp'} -> long_title ( "Data Comparissons" ); #$page{'radar_comp'} -> file_name ( "radar_comp.html" ); #$page{'radar_comp'} -> path2main ( "../../" ); #$page{'radar_comp'} -> parent ( "plats/radar" ); #$page{'radar_comp'} -> content_files ( "radar_1.txt","radar_comp.txt" ); #$page{'radar_analysis'} = Web->new_page(); #$page{'radar_analysis'} -> afs_path ( "plats/radar/" ); #$page{'radar_analysis'} -> short_title ( "Analysis" ); #$page{'radar_analysis'} -> long_title ( "Data Analysis" ); #$page{'radar_analysis'} -> file_name ( "radar_analysis.html" ); #$page{'radar_analysis'} -> path2main ( "../../" ); #$page{'radar_analysis'} -> parent ( "plats/radar" ); #$page{'radar_analysis'} -> content_files ( "radar_1.txt","radar_analysis.txt" ); #$page{'tower_R4'} = Web->new_page(); #$page{'tower_R4'} -> afs_path ( "plats/tower_R4/" ); #$page{'tower_R4'} -> short_title ( "R4 Tower" ); #$page{'tower_R4'} -> long_title ( "Navy Tower R4" ); #$page{'tower_R4'} -> file_name ( "index.html" ); #$page{'tower_R4'} -> path2main ( "../../" ); #$page{'tower_R4'} -> menu_items ( 'tower_R4_sys','tower_R4_pkg' ); #$page{'tower_R4'} -> parent ( "plats" ); #$page{'tower_R4'} -> content_files ( "tower_R4.txt" ); #$page{'tower_R4'} -> dynamic_table ( "contents/tables/tower_r4.txt" ); #$page{'tower_R4_sys'} = Web->new_page(); #$page{'tower_R4_sys'} -> afs_path ( "plats/tower_R4/" ); #$page{'tower_R4_sys'} -> short_title ( "System" ); #$page{'tower_R4_sys'} -> long_title ( "System Info" ); #$page{'tower_R4_sys'} -> file_name ( "sys_info.html" ); #$page{'tower_R4_sys'} -> path2main ( "../../" ); #$page{'tower_R4_sys'} -> parent ( "plats/tower_R4" ); #$page{'tower_R4_sys'} -> content_files ( "tower_R4.txt" ); #$page{'tower_R4_sys'} -> dynamic_table ( "contents/tables/tower_r4_sys.txt" ); ##$page{'tower_R4_pkg'} = Web->new_page(); ##$page{'tower_R4_pkg'} -> afs_path ( "plats/tower_R4/" ); ##$page{'tower_R4_pkg'} -> short_title ( "Package" ); ##$page{'tower_R4_pkg'} -> long_title ( "Package Details" ); ##$page{'tower_R4_pkg'} -> file_name ( "pkg_info.html" ); ##$page{'tower_R4_pkg'} -> path2main ( "../../" ); ##$page{'tower_R4_pkg'} -> parent ( "plats/tower_R4" ); ##$page{'tower_R4_pkg'} -> content_files ( "tower_R4.txt","tower_R4_pkg.txt" ); #This page will be replaced by the contents of buoy_data ##$page{'buoy'} = Web->new_page(); ##$page{'buoy'} -> afs_path ( "plats/buoy/" ); ##$page{'buoy'} -> short_title ( "Buoy" ); ##$page{'buoy'} -> long_title ( "Cape Lookout Buoy" ); ##$page{'buoy'} -> file_name ( "index.html" ); ##$page{'buoy'} -> path2main ( "../../" ); ##$page{'buoy'} -> parent ( "plats" ); ##$page{'buoy'} -> content_files ( "buoy.txt" ); $page{'buoy'} = Web->new_page(); $page{'buoy'} -> afs_path ( "plats/buoy/" ); $page{'buoy'} -> short_title ( "Buoy" ); $page{'buoy'} -> long_title ( "Lookout Shoals Research Buoy" ); $page{'buoy'} -> file_name ( "index.html" ); $page{'buoy'} -> path2main ( "../../" ); $page{'buoy'} -> parent ( "plats" ); $page{'buoy'} -> menu_items ( 'buoy_sys','buoy_pkg' ); $page{'buoy'} -> content_files ( "buoy_lsrb.txt"); #"buoy_down.txt" ); #"technical.txt" ); $page{'buoy'} -> script_files ( "popup.js" ); $page{'buoy'} -> dynamic_table ( "contents/tables/buoy_lsrb.txt"); #"contents/tables/buoy_lsrb_surf.txt", #"contents/tables/buoy_lsrb_midw.txt"); $page{'buoy_sys'} = Web->new_page(); $page{'buoy_sys'} -> afs_path ( "plats/buoy/" ); $page{'buoy_sys'} -> short_title ( "System" ); $page{'buoy_sys'} -> long_title ( "Buoy System Data" ); $page{'buoy_sys'} -> file_name ( "sys.html" ); $page{'buoy_sys'} -> path2main ( "../../" ); $page{'buoy_sys'} -> parent ( "plats/buoy" ); $page{'buoy_sys'} -> content_files ( "buoy_lsrb.txt" ); $page{'buoy_sys'} -> dynamic_table ( "contents/tables/buoy_lsrb_sys.txt" ); #$page{'buoy_pkg'} = Web->new_page(); #$page{'buoy_pkg'} -> afs_path ( "plats/buoy/" ); #$page{'buoy_pkg'} -> short_title ( "Package" ); #$page{'buoy_pkg'} -> long_title ( "Buoy Package Info" ); #$page{'buoy_pkg'} -> file_name ( "pkg_test.html" ); #$page{'buoy_pkg'} -> path2main ( "../../" ); #$page{'buoy_pkg'} -> parent ( "plats/buoy" ); #$page{'buoy_pkg'} -> content_files ( "buoy_lsrb.txt", "buoy_pkg.txt" ); #$page{'jpop'} = Web->new_page(); #$page{'jpop'} -> afs_path ( "plats/jpop/" ); #$page{'jpop'} -> short_title ( "JPOP" ); #$page{'jpop'} -> long_title ( "Jennette's Pier Observing Partnership" ); #$page{'jpop'} -> file_name ( "index.html" ); #$page{'jpop'} -> path2main ( "../../" ); #$page{'jpop'} -> parent ( "plats" ); #$page{'jpop'} -> content_files ( "jpop.txt" ); #$page{'neuse'} = Web->new_page(); #$page{'neuse'} -> afs_path ( "plats/neuse/" ); #$page{'neuse'} -> short_title ( "Neuse" ); #$page{'neuse'} -> long_title ( "Neuse River Profiling Station" ); #$page{'neuse'} -> file_name ( "index.html" ); #$page{'neuse'} -> path2main ( "../../" ); #$page{'neuse'} -> parent ( "plats" ); #$page{'neuse'} -> content_files ( "neuse.txt" ); #$page{'roof'} = Web->new_page(); #$page{'roof'} -> afs_path ( "plats/roof/" ); #$page{'roof'} -> short_title ( "Roof" ); #$page{'roof'} -> long_title ( "Roof Development Package" ); #$page{'roof'} -> file_name ( "index.html" ); #$page{'roof'} -> path2main ( "../../" ); #$page{'roof'} -> parent ( "plats" ); #$page{'roof'} -> menu_items ( 'roof_sys','roof_pkg' ); #$page{'roof'} -> content_files ( "roof.txt" ); #$page{'roof'} -> dynamic_table ( "contents/tables/roof.txt" ); #$page{'roof_sys'} = Web->new_page(); #$page{'roof_sys'} -> afs_path ( "plats/roof/" ); #$page{'roof_sys'} -> short_title ( "System" ); #$page{'roof_sys'} -> long_title ( "System Info" ); #$page{'roof_sys'} -> file_name ( "sys_info.html" ); #$page{'roof_sys'} -> path2main ( "../../" ); #$page{'roof_sys'} -> parent ( "plats/roof" ); #$page{'roof_sys'} -> content_files ( "roof.txt","roof_sys.txt" ); #$page{'roof_sys'} -> dynamic_table ( "contents/tables/roof_sys.txt" ); #$page{'roof_pkg'} = Web->new_page(); #$page{'roof_pkg'} -> afs_path ( "plats/roof/" ); #$page{'roof_pkg'} -> short_title ( "Package" ); #$page{'roof_pkg'} -> long_title ( "Package Details" ); #$page{'roof_pkg'} -> file_name ( "pkg_info.html" ); #$page{'roof_pkg'} -> path2main ( "../../" ); #$page{'roof_pkg'} -> parent ( "plats/roof" ); ##$page{'roof_pkg'} -> articles ( 'roof_daq','roof_com','roof_trans' ); #$page{'roof_pkg'} -> content_files ( "roof.txt","roof_pkg.txt" ); #$page{'sst'} = Web->new_page(); #$page{'sst'} -> afs_path ( "obs/" ); ##$page{'sst'} -> on_mouseover ('sst_v_w.png'); #$page{'sst'} -> file_name ( "sst.html" ); #$page{'sst'} -> short_title ( "SST" ); #$page{'sst'} -> long_title ( "Sea Surface Temperature" ); #$page{'sst'} -> parent ( "obs" ); #$page{'sst'} -> path2main ( "../" ); #$page{'sst'} -> script_files ( "popup.js" ); #$page{'sst'} -> image_maps ( "obs_sst.map" ); #$page{'sst'} -> content_files ( "sst.txt" ); #$page{'wind'} = Web->new_page(); #$page{'wind'} -> afs_path ( "obs/" ); ##$page{'wind'} -> on_mouseover ( 'wind_v.png' ); #$page{'wind'} -> file_name ( "wind.html" ); #$page{'wind'} -> short_title ( "Wind" ); #$page{'wind'} -> long_title ( "Wind Velocities" ); #$page{'wind'} -> parent ( "obs" ); #$page{'wind'} -> path2main ( "../" ); #$page{'wind'} -> script_files ( "popup.js" ); #$page{'wind'} -> image_maps ( "obs_wind.map" ); #$page{'wind'} -> content_files ( "wind.txt" ); #$page{'vel'} = Web->new_page(); #$page{'vel'} -> afs_path ( "obs/" ); ##$page{'vel'} -> on_mouseover ('vel.png'); #$page{'vel'} -> file_name ( "vel.html" ); #$page{'vel'} -> short_title ( "Currents" ); #$page{'vel'} -> long_title ( "Water Velocities" ); #$page{'vel'} -> parent ( "obs" ); #$page{'vel'} -> script_files ( "popup.js" ); #$page{'vel'} -> image_maps ( "obs_vel.map" ); #$page{'vel'} -> path2main ( "../" ); #$page{'vel'} -> content_files ( "vel.txt" ); ##$page{'salin'} = Web->new_page(); ##$page{'salin'} -> afs_path ( "obs/" ); ##$page{'salin'} -> on_mouseover ('salin_v_w.png'); ##$page{'salin'} -> file_name ( "salin.html" ); ##$page{'salin'} -> short_title ( "Salinity" ); ##$page{'salin'} -> path2main ( "../" ); ##$page{'salin'} -> parent ( "obs" ); #$page{'wl'} = Web->new_page(); #$page{'wl'} -> afs_path ( "obs/" ); ##$page{'wl'} -> on_mouseover ('wl_v_w.png'); #$page{'wl'} -> file_name ( "wl.html" ); #$page{'wl'} -> short_title ( "Water Level" ); #$page{'wl'} -> long_title ( "Water Level" ); #$page{'wl'} -> path2main ( "../" ); #$page{'wl'} -> parent ( "obs" ); #$page{'wl'} -> content_files ( "wl.txt" ); #$page{'radial'} = Web->new_page(); ##$page{'radial'} -> on_mouseover ('radial.png'); #$page{'radial'} -> afs_path ( "obs/" ); #$page{'radial'} -> file_name ( "radial.html" ); #$page{'radial'} -> short_title ( "Radials" ); #$page{'radial'} -> long_title ( "Radial Surface Velocities" ); #$page{'radial'} -> path2main ( "../" ); #$page{'radial'} -> parent ( "obs" ); #$page{'radial'} -> content_files ( "radial.txt" ); #$page{'exper'} = Web->new_page(); #$page{'exper'} -> afs_path ( "" ); ##$page{'exper'} -> file_name ( "" ); #$page{'exper'} -> short_title ( "Note: Experimental!" ); #$page{'exper'} -> path2main ( "../" ); #$page{'adcirc'} = Web->new_page(); #$page{'adcirc'} -> afs_path ( "mods/adcirc/" ); #$page{'adcirc'} -> file_name ( "index.html" ); #$page{'adcirc'} -> short_title ( "ADCIRC" ); #$page{'adcirc'} -> long_title ( "ADCIRC Tidal and Wind Model" ); #$page{'adcirc'} -> path2main ( "../../" ); #$page{'adcirc'} -> content_files ( "adcirc.txt" ); ##$page{'adcirc'} -> menu_items ( 'adcirc_wl','adcirc_suv' ); #$page{'adcirc'} -> parent ( "mods" ); #$page{'adcirc_wl'} = Web->new_page(); #$page{'adcirc_wl'} -> afs_path ( "mods/adcirc/" ); #$page{'adcirc_wl'} -> file_name ( "adcirc_wl.html" ); #$page{'adcirc_wl'} -> short_title ( "Water Level" ); #$page{'adcirc_wl'} -> long_title ( "ADCIRC Water Level" ); #$page{'adcirc_wl'} -> path2main ( "../../" ); #$page{'adcirc_wl'} -> content_files ( "adcirc_wl.txt" ); #$page{'adcirc_wl'} -> parent ( "mods/adcirc" ); #$page{'adcirc_suv'} = Web->new_page(); #$page{'adcirc_suv'} -> afs_path ( "mods/adcirc/" ); #$page{'adcirc_suv'} -> file_name ( "adcirc_suv.html" ); #$page{'adcirc_suv'} -> short_title ( "Currents" ); #$page{'adcirc_suv'} -> long_title ( "ADCIRC Surface Currents" ); #$page{'adcirc_suv'} -> path2main ( "../../" ); #$page{'adcirc_suv'} -> content_files ( "adcirc_suv.txt" ); #$page{'adcirc_suv'} -> parent ( "mods/adcirc" ); #$page{'quoddy'} = Web->new_page(); #$page{'quoddy'} -> afs_path ( "mods/quoddy/" ); #$page{'quoddy'} -> file_name ( "index.html" ); #$page{'quoddy'} -> short_title ( "QUODDY" ); #$page{'quoddy'} -> long_title ( "QUODDY Tidal and Wind Model" ); #$page{'quoddy'} -> path2main ( "../../" ); #$page{'quoddy'} -> content_files ( "quoddy.txt" ); #$page{'quoddy'} -> menu_items ( 'quoddy_sst','quoddy_suv' ); #$page{'quoddy'} -> parent ( "mods" ); #$page{'quoddy_sst'} = Web->new_page(); #$page{'quoddy_sst'} -> afs_path ( "mods/quoddy/" ); #$page{'quoddy_sst'} -> file_name ( "quoddy_sst.html" ); #$page{'quoddy_sst'} -> short_title ( "SST" ); #$page{'quoddy_sst'} -> long_title ( "QUODDY Sea Surface Temperature" ); #$page{'quoddy_sst'} -> path2main ( "../../" ); #$page{'quoddy_sst'} -> content_files ( "quoddy_sst.txt" ); #$page{'quoddy_sst'} -> parent ( "mods/quoddy" ); #$page{'quoddy_wl'} = Web->new_page(); #$page{'quoddy_wl'} -> afs_path ( "mods/quoddy/" ); #$page{'quoddy_wl'} -> file_name ( "quoddy_wl.html" ); #$page{'quoddy_wl'} -> short_title ( "Water Level" ); #$page{'quoddy_wl'} -> long_title ( "QUODDY Water Level" ); #$page{'quoddy_wl'} -> path2main ( "../../" ); #$page{'quoddy_wl'} -> content_files ( "quoddy_wl.txt" ); #$page{'quoddy_wl'} -> parent ( "mods/quoddy" ); #$page{'quoddy_suv'} = Web->new_page(); #$page{'quoddy_suv'} -> afs_path ( "mods/quoddy/" ); #$page{'quoddy_suv'} -> file_name ( "quoddy_suv.html" ); #$page{'quoddy_suv'} -> short_title ( "Currents" ); #$page{'quoddy_suv'} -> long_title ( "QUODDY Surface Currents" ); #$page{'quoddy_suv'} -> path2main ( "../../" ); #$page{'quoddy_suv'} -> content_files ( "quoddy_suv.txt" ); #$page{'quoddy_suv'} -> parent ( "mods/quoddy" ); #$page{'eta'} = Web->new_page(); #$page{'eta'} -> afs_path ( "mods/eta/" ); #$page{'eta'} -> file_name ( "index.html" ); #$page{'eta'} -> short_title ( "ETA" ); #$page{'eta'} -> long_title ( "ETA Atmospheric Model" ); #$page{'eta'} -> path2main ( "../../" ); #$page{'eta'} -> content_files ( "eta.txt" ); #$page{'eta'} -> menu_items ( 'eta_wind','eta_sst' ); #$page{'eta'} -> parent ( "mods" ); #$page{'eta_wind'} = Web->new_page(); #$page{'eta_wind'} -> afs_path ( "mods/eta/" ); #$page{'eta_wind'} -> file_name ( "eta_wind.html" ); #$page{'eta_wind'} -> short_title ( "Wind" ); #$page{'eta_wind'} -> long_title ( "ETA Wind Velocity" ); #$page{'eta_wind'} -> path2main ( "../../" ); #$page{'eta_wind'} -> content_files ( "eta_wind.txt" ); #$page{'eta_wind'} -> parent ( "mods/eta" ); #$page{'eta_sst'} = Web->new_page(); #$page{'eta_sst'} -> afs_path ( "mods/eta/" ); #$page{'eta_sst'} -> file_name ( "eta_sst.html" ); #$page{'eta_sst'} -> short_title ( "SST" ); #$page{'eta_sst'} -> long_title ( "ETA Sea Surface Temperature" ); #$page{'eta_sst'} -> path2main ( "../../" ); #$page{'eta_sst'} -> content_files ( "eta_sst.txt" ); #$page{'eta_sst'} -> parent ( "mods/eta" ); #$page{'blank'} = Web->new_page(); #$page{'blank'} -> afs_path ( "" ); #$page{'blank'} -> short_title ( '' ); #$page{'blank'} -> long_title ( "" ); #$page{'blank'} -> path2main ( "" ); ##$page{'hycom'} = Web->new_page(); ##$page{'hycom'} -> afs_path ( "mods/" ); ##$page{'hycom'} -> file_name ( "hycom.html" ); ##$page{'hycom'} -> short_title ( "HYCOM" ); ##$page{'hycom'} -> path2main ( "../" ); ##$page{'latest'} = Web->new_page(); ##$page{'latest'} -> afs_path ( "data/" ); ##$page{'latest'} -> file_name ( "latest_v2.0" ); ##$page{'latest'} -> short_title ( "Latest Real-Time Data" ); ##$page{'latest'} -> path2main ( "../" ); #$article{'obs'} = Web->new_article(); #$article{'obs'} -> short_title ( "Observations" ); #$article{'obs'} -> long_title ( "Merged Maps" ); #$article{'obs'} -> target_url ( "obs/" ); ##$article{'obs'} -> thumbnail ( "obs_thumb.png" ); #$article{'obs'} -> thumbnail ( "img/blank_map_thumb.png" ); #$article{'obs'} -> content_files ( "obs.txt" ); #$article{'currents'} = Web->new_article(); #$article{'currents'} -> short_title ( "Currents" ); #$article{'currents'} -> long_title ( "Sea Surface Currents" ); ##$article{'currents'} -> target_url ( "img/rt/vel.png" ); #$article{'currents'} -> target_url ( "obs/vel.html" ); ##$article{'currents'} -> thumbnail ( "obs_thumb.png" ); #$article{'currents'} -> thumbnail ( "img/obs/suv_latest_thumb.png" ); #$article{'currents'} -> content_files ( "currents.txt" ); #$article{'winds'} = Web->new_article(); #$article{'winds'} -> short_title ( "Winds" ); #$article{'winds'} -> long_title ( "Wind Veolcities" ); #$article{'winds'} -> target_url ( "obs/wind.html" ); #$article{'winds'} -> thumbnail ( "img/obs/wind_latest_thumb.png" ); #$article{'winds'} -> content_files ( "winds.txt" ); #$article{'sst'} = Web->new_article(); #$article{'sst'} -> short_title ( "SST" ); #$article{'sst'} -> long_title ( "Sea Surface Temperature" ); #$article{'sst'} -> target_url ( "obs/sst.html" ); #$article{'sst'} -> thumbnail ( "img/obs/sst_latest_thumb.png" ); #$article{'sst'} -> content_files ( "sst.txt" ); #$article{'wl'} = Web->new_article(); #$article{'wl'} -> short_title ( "Water Level" ); #$article{'wl'} -> long_title ( "Water Level" ); #$article{'wl'} -> target_url ( "obs/wl.html" ); ##$article{'wl'} -> thumbnail ( "wl_thumb.png" ); #$article{'wl'} -> thumbnail ( "img/obs/wl_latest_thumb.png" ); #$article{'wl'} -> content_files ( "wl.txt" ); ##$article{'salin'} = Web->new_article(); ##$article{'salin'} -> short_title ( "Salinity" ); ##$article{'salin'} -> long_title ( "Surface Salinity" ); ##$article{'salin'} -> target_url ( "obs/salin.html" ); ##$article{'salin'} -> thumbnail ( "salin_thumb.png" ); ##$article{'salin'} -> thumbnail ( "example.png" ); ##$article{'salin'} -> content_files ( "salin.txt" ); #$article{'radial'} = Web->new_article(); #$article{'radial'} -> short_title ( "Radials" ); #$article{'radial'} -> long_title ( "Surface Current Radial Components " ); #$article{'radial'} -> target_url ( "obs/radial.html" ); ##$article{'radial'} -> thumbnail ( "radial_thumb.png" ); #$article{'radial'} -> thumbnail ( "img/blank_map_thumb.png" ); #$article{'radial'} -> content_files ( "radials.txt" ); #$article{'radar'} = Web->new_article(); #$article{'radar'} -> short_title ( "Radar" ); #$article{'radar'} -> long_title ( "Surface Current Radar Observations" ); #$article{'radar'} -> target_url ( "plats/radar/" ); ##$article{'radar'} -> thumbnail ( "radar_thumb.png" ); #$article{'radar'} -> thumbnail ( "img/thumbnails/codar_receive.jpg" ); #$article{'radar'} -> content_files ( "radar.txt" ); $article{'tower_R4'} = Web->new_article(); $article{'tower_R4'} -> short_title ( "Tower R4" ); $article{'tower_R4'} -> long_title ( "Tower R4 Package" ); $article{'tower_R4'} -> target_url ( "plats/tower_R4/" ); #$article{'tower_R4'} -> thumbnail ( "tower_R4_thumb.png" ); $article{'tower_R4'} -> thumbnail ( "img/thumbnails/r8_tower.jpg" ); $article{'tower_R4'} -> content_files ( "tower_R4.txt" ); #$article{'buoy'} = Web->new_article(); #$article{'buoy'} -> short_title ( "Buoy" ); #$article{'buoy'} -> long_title ( "Cape Lookout Buoy" ); #$article{'buoy'} -> target_url ( "plats/buoy/" ); ##$article{'buoy'} -> thumbnail ( "buoy_thumb.png" ); #$article{'buoy'} -> thumbnail ( "img/thumbnails/buoy_unload2.png" ); #$article{'buoy'} -> content_files ( "buoy.txt" ); #$article{'jpop'} = Web->new_article(); #$article{'jpop'} -> short_title ( "Jpop" ); #$article{'jpop'} -> long_title ( "Jennette's Pier Observing Partnership" ); #$article{'jpop'} -> target_url ( "plats/jpop/" ); ##$article{'jpop'} -> thumbnail ( "jpop_thumb.png" ); #$article{'jpop'} -> thumbnail ( "img/thumbnails/jpier_thumb.png" ); #$article{'jpop'} -> content_files ( "jpop.txt" ); #$article{'neuse'} = Web->new_article(); #$article{'neuse'} -> short_title ( "Neuse" ); #$article{'neuse'} -> long_title ( "Neuse River Profiler" ); #$article{'neuse'} -> target_url ( "plats/neuse/" ); ##$article{'neuse'} -> thumbnail ( "neuse_thumb.png" ); #$article{'neuse'} -> thumbnail ( "img/thumbnails/neuse_platform2.png" ); #$article{'neuse'} -> content_files ( "neuse.txt" ); #$article{'roof'} = Web->new_article(); #$article{'roof'} -> short_title ( "Development" ); #$article{'roof'} -> long_title ( "Development Package for Towers and Buoys" ); #$article{'roof'} -> target_url ( "plats/roof/" ); ##$article{'roof'} -> thumbnail ( "roof_thumb.png" ); #$article{'roof'} -> thumbnail ( "img/thumbnails/roof_pkg.jpg" ); #$article{'roof'} -> content_files ( "roof.txt" ); #$article{'roof_daq'} = Web->new_article(); #$article{'roof_daq'} -> short_title ( "DAQ" ); #$article{'roof_daq'} -> long_title ( "Data Acquisition Package" ); ##$article{'roof_daq'} -> target_url ( "plats/roof/" ); ##$article{'roof'} -> thumbnail ( "roof_thumb.png" ); ##$article{'roof_daq'} -> thumbnail ( "roof_pkg.jpg" ); #$article{'roof_daq'} -> content_files ( "roof_daq.txt" ); #$article{'roof_com'} = Web->new_article(); #$article{'roof_com'} -> short_title ( "ComLib" ); #$article{'roof_com'} -> long_title ( "Communications Library" ); ##$article{'roof_com'} -> target_url ( "plats/roof/" ); ##$article{'roof'} -> thumbnail ( "roof_thumb.png" ); ##$article{'roof_com'} -> thumbnail ( "roof_pkg.jpg" ); #$article{'roof_com'} -> content_files ( "roof_com.txt" ); #$article{'roof_trans'} = Web->new_article(); #$article{'roof_trans'} -> short_title ( "Transfer" ); #$article{'roof_trans'} -> long_title ( "Data Transfer Package" ); ##$article{'roof_trans'} -> target_url ( "plats/roof/" ); ##$article{'roof'} -> thumbnail ( "roof_thumb.png" ); ##$article{'roof_trans'} -> thumbnail ( "roof_pkg.jpg" ); #$article{'roof_trans'} -> content_files ( "roof_trans.txt" );