Index: tower_buoy/bin/meta_data/nccoos_map_locs.txt =================================================================== --- tower_buoy/bin/meta_data/nccoos_map_locs.txt (revision 7) +++ (revision ) @@ -1,87 +1,0 @@ -CHLV2 36.91 75.71 ndbc Chesapeake Light, VA -44014 36.58 74.84 ndbc VIRGINIA BEACH 64 NM East of Virginia Beach, VA -DUCN7 36.18 75.75 ndbc Duck Pier, NC -41025 35.15 75.29 ndbc Diamond Shoals (Red Buoy) -CLKN7 34.62 76.52 ndbc Cape Lookout, NC -41013 33.48 77.58 ndbc Frying Pan Shoals, NC Buoy -41001 34.68 72.66 ndbc 150 NM East of Cape HATTERAS -41002 32.27 75.42 ndbc S HATTERAS - 250 NM East of Charleston, SC -FBIS1 32.68 79.89 ndbc Folly Island, SC -41004 32.50 79.10 ndbc EDISTO - 41 NM Southeast of Charleston, SC -8631044 37.61 75.69 nos WACHAPREAGUE, VA -8636580 37.62 76.29 nos WINDMILL POINT, VA -8635150 38.25 76.96 nos COLONIAL BEACH, VA -8635750 37.99 76.47 nos LEWISETTA, VA -8632200 37.17 75.99 nos KIPTOPEKE, VA -8637624 37.25 76.50 nos GLOUCESTER POINT, VA -8638610 36.95 76.33 nos SEWELLS POINT, VA -8638863 36.97 76.11 nos CHESAPEAKE BAY BRIDGE TUNNEL, VA -8639348 36.78 76.30 nos MONEY POINT, VA -8651370 36.18 75.75 nos DUCK, FRF PIER, NC -8652587 35.80 75.55 nos OREGON INLET MARINA, NC -8654400 35.22 75.64 nos CAPE HATTERAS FISHING PIER, NC -8656483 34.72 76.67 nos BEAUFORT, DUKE MARINE LAB, NC -8658120 34.23 77.95 nos WILMINGTON, NC -8659897 33.87 78.51 nos SUNSET BEACH, NC -8661070 33.66 78.92 nos SPRINGMAID PIER, SC -8662245 33.35 79.19 nos OYSTER LANDING, CRAB HAUL CREEK, SC -8665530 32.78 79.92 nos CHARLESTON, COOPER RIVER ENTRANCE, SC -8664941 32.86 79.71 nos SOUTH CAPERS ISLAND, SC -8668498 32.34 80.47 nos FRIPPS INLET, SC -8670870 32.03 80.90 nos FORT PULASKI, SAVANNAH RIVER, GA -ncclb 34.4 76.5 nccoos Cape Lookout Buoy -ncnrp 35.08 76.53 nccoos Neuse River Platform -0208455560 35.52 76.50 usgs PUNGO RIVER CHANNEL LT 18 -0208455155 35.36 76.65 usgs PAMLICO RIV. AT LT.3 -0208453300 35.43 76.84 usgs PAMLICO RIVER AT LT.5 -02084472 35.54 77.06 usgs PAMLICO RIVER AT WASHINGTON, NC -0209265810 34.95 76.81 usgs NEUSE RIVER AT CHANNEL LIGHT 9 -0209262905 35.00 76.94 usgs NEUSE RIVER AT CHANNEL LIGHT 11 -02092162 35.11 77.03 usgs NEUSE RIVER AT NEW BERN, NC -02108690 34.26 77.95 usgs NE CAPE FEAR RIVER NEAR WILMINGTON, NC -02110809 33.56 79.09 usgs WACCAMAW R @ WACHESAW LAND. NR MURRELLS INLET, SC -021108125 33.51 79.13 usgs WACCAMAW RIVER NEAR PAWLEYS ISLAND, SC -02110815 33.44 79.18 usgs WACCAMAW R @ HAGLEY LAND. NR PAWLEYS ISLAND, SC -02136370 33.36 79.30 usgs SAMPIT RIVER AT GEORGETOWN, SC -02171905 33.15 79.35 usgs S. SANTEE R @ STATE PIER NR MCCLELLANVILLE, SC -02171850 33.18 79.41 usgs SOUTH SANTEE RIVER NR MCCLELLANVILLE, S.C. -021720698 32.86 79.90 usgs WANDO RIVER ABOVE MT PLEASANT, SC -021720709 32.80 79.91 usgs COOPER RIVER AT U.S. HWY 17 AT CHARLESTON, SC -021720677 32.89 79.96 usgs COOPER RIVER @ FILBIN CREEK @ NORTH CHARLESTON, SC -02172053 32.98 79.92 usgs COOPER R AT MOBAY NR N CHARLESTON, SC -021720711 32.78 79.92 usgs COOPER RIVER AT CUSTOMS HOUSE AT CHARLESTON, SC -KEWN 35.07 77.05 metar New Bern, NC -KOCW 35.57 77.05 metar Washington, NC -KPGV 35.62 77.40 metar Pitt Greenville, NC -KTDF 36.38 78.98 metar Roxboro Person, NC -KHNZ 36.37 78.53 metar Henderson/Oxford, NC -KRDU 35.87 78.78 metar Raleigh/Durham, NC -KBUY 36.05 79.47 metar Burlington, NC -KHBI 35.65 79.90 metar Asheboro Municipal, NC -KMEB 34.78 78.37 metar Maxton, NC -KPOB 35.27 79.02 metar Pope AFB, NC -KTTA 35.58 79.10 metar Sanford, NC -KSOP 35.22 79.40 metar Southern Pines, NC -KFAY 34.98 78.88 metar Fayetteville,NC -KHRJ 35.38 78.73 metar Erwin/Harnett Co., NC -KEYF 34.60 78.58 metar Elizabethtown, NC -KCTZ 34.98 78.37 metar Clinton, NC -KJNX 35.53 78.38 metar Smithfield Johns, NC -KRWI 35.85 77.90 metar Rocky Mount, NC -KRZZ 36.43 77.72 metar Roanoke Rapids, NC -KASJ 36.28 77.17 metar Ahoskie/Tri County, NC -KDPL 35.00 77.97 metar Kenansville/Dupl, NC -KGWW 35.47 77.97 metar Goldsboro/Wayne, NC -KOAJ 34.82 77.62 metar Jacksonville, NC -KISO 35.32 77.62 metar Kinston/Stalling, NC -KILM 34.27 77.90 metar Wilmington, NC -KCPC 34.27 78.72 metar Whiteville, NC -KSUT 33.93 78.08 metar Southport, NC -KEDE 36.02 76.57 metar Edenton, NC -KMQI 35.92 75.70 metar Manteo/Dare Co., NC -KHSE 35.23 75.62 metar Hatteras/Mitchel, NC -KEMV 36.68 77.48 metar Emporia, VA -KFLO 34.18 79.73 metar Florence, SC -KUGG 34.45 79.88 metar Darlington Co.,SC -KMYR 33.67 78.92 metar Myrtle Beach, SC -KCRE 33.82 78.72 metar North Myrtle Beach, SC Index: tower_buoy/bin/meta_data/nccoos_page_info.pm =================================================================== --- tower_buoy/bin/meta_data/nccoos_page_info.pm (revision 7) +++ (revision ) @@ -1,666 +1,0 @@ -#meta_data.pm -#Time-stamp: <2006-06-26 11:44:28 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" ); - - Index: tower_buoy/bin/meta_data/nccoos_page_info_2005_01_30.pm =================================================================== --- tower_buoy/bin/meta_data/nccoos_page_info_2005_01_30.pm (revision 7) +++ (revision ) @@ -1,616 +1,0 @@ -#meta_data.pm -#Time-stamp: <2005-01-30 22:01:29 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','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','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 ( "" ); -$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" ); - -###################################################################### -## 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", - "radar_3.txt", - "radar_4.txt"); -#$page{'radar'} -> dynamic_table ( "contents/tables/codar_suv.txt" ); -$page{'radar'} -> script_files ( 'loc_data.js' ); - -$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{'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_data'} = Web->new_page(); -$page{'buoy_data'} -> afs_path ( "plats/buoy/" ); -$page{'buoy_data'} -> short_title ( "Buoy" ); -$page{'buoy_data'} -> long_title ( "Cape Lookout Buoy" ); -$page{'buoy_data'} -> file_name ( "data_test.html" ); -$page{'buoy_data'} -> path2main ( "../../" ); -$page{'buoy_data'} -> parent ( "plats/buoy" ); -$page{'buoy_data'} -> content_files ( "buoy_lsrb.txt" ); -$page{'buoy_data'} -> dynamic_table ( "contents/tables/buoy_lsrb.txt" ); - -$page{'buoy_sys'} = Web->new_page(); -$page{'buoy_sys'} -> afs_path ( "plats/buoy/" ); -$page{'buoy_sys'} -> short_title ( "Buoy" ); -$page{'buoy_sys'} -> long_title ( "Cape Lookout Buoy" ); -$page{'buoy_sys'} -> file_name ( "sys_test.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 ( "Buoy" ); -$page{'buoy_pkg'} -> long_title ( "Cape Lookout Buoy" ); -$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{'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{'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" ); - - Index: tower_buoy/bin/meta_data/nccoos_page_info_orgtest.pm =================================================================== --- tower_buoy/bin/meta_data/nccoos_page_info_orgtest.pm (revision 7) +++ (revision ) @@ -1,261 +1,0 @@ -#meta_data.pm -#Time-stamp: <2006-04-06 16:45:47 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_orgtest; # 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 -###################################################################### - - - -###################################################################### -## Platforms Main Page ## ~/obs/index_test.html ## -###################################################################### - -$page{'plats'} = Web->new_page(); -$page{'plats'} -> afs_path ( "plats/" ); -$page{'plats'} -> path2main ( "../" ); -$page{'plats'} -> file_name ( "index_test.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' ); - -###################################################################### -## 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_test.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_test.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_test.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_test.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_test.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_test.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_test.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{'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_test.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_test.html" ); -$page{'buoy_sys'} -> path2main ( "../../" ); -$page{'buoy_sys'} -> parent ( "plats/buoy" ); -$page{'buoy_sys'} -> content_files ( "buoy_lsrb.txt" );#,"buoy_down.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_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_test.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_test.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_test.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_test.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_test.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{'blank'} = Web->new_page(); -$page{'blank'} -> afs_path ( "" ); -$page{'blank'} -> short_title ( '' ); -$page{'blank'} -> long_title ( "" ); -$page{'blank'} -> path2main ( "" ); - - -$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" ); Index: tower_buoy/bin/meta_data/nccoos_page_info_test.pm =================================================================== --- tower_buoy/bin/meta_data/nccoos_page_info_test.pm (revision 7) +++ (revision ) @@ -1,665 +1,0 @@ -#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" ); - -