#!/usr/bin/perl # # This file is the frameset for the radar pages as called by the main radar page # The only query is the station ID # # Created by Paul Sirvatka, December 2002 # use CGI qw(:standard); $station = $ENV{QUERY_STRING}; if ($station eq ""){$station = "LOT";} print header(); print qq(