ndfd18.pl File Reference

Go to the source code of this file.

Functions

use lib dirname (abs_path($0 or $PROGRAM_NAME))
 our ($opt_v, $opt_t, $opt_T, $opt_l, $opt_u, $opt_d)
 getopts ('Tvtlu:d:')
 if (defined $opt_v)
 my ($latitude, $longitude)
 if (!(defined $opt_u &&defined $latitude &&defined $longitude &&$latitude ne""&&$longitude ne""))
 if (open(CACHE,"$dir/ndfd18_cache_${latitude}_${longitude}"))
 if ($getData)
printf updatetime::Last
Updated on s 
UnixDate ($creationdate,"%b %d, %I:%M %p %Z")
foreach my $time (sort keys%$result)

Variables

use strict
use warnings
use English
use Cwd abs_path
use lib usr share mythtv
mythweather scripts 
us_nws
use NDFDParser
use NWSLocation
my $name = 'NDFD-18_Hour'
my $version = 0.5
my $author = 'Gavin Hurlbut / Lucien Dunning'
my $email = 'gjhurlbu@gmail.com / ldunning@gmail.com'
my $updateTimeout = 15*60
my $retrieveTimeout = 30
my types
my $dir = './'
my $icon_file = dirname(abs_path($0 or $PROGRAM_NAME)) . "/icons"
my $locstr = shift
my $units = $opt_u
my $param
my $d1 = UnixDate("now", "%O")
my $d2 = UnixDate(DateCalc($d1, "+ 18 hours"), "%O")
my $result
my $creationdate
my $nextupdate
my $getData = 1
my $index = 0
my $icon
printf updatetime::Last
Updated on s 
n
my $pop12

Function Documentation

use lib dirname ( abs_path($0 or $PROGRAM_NAME)   ) 
our ( opt_v,
opt_t,
opt_T,
opt_l,
opt_u,
opt_d 
)
getopts ( 'Tvtlu:d:'   ) 
if ( defined $  opt_v  ) 

Definition at line 67 of file ndfd18.pl.

my ( latitude,
longitude 
)
if ( defined $opt_u &&defined $latitude &&defined $longitude &&$latitude ne""&&$longitude ne""  ) 

Definition at line 74 of file ndfd18.pl.

if ( open(CACHE,"$dir/ndfd18_cache_${latitude}_${longitude}")   ) 

Definition at line 102 of file ndfd18.pl.

if ( getData  ) 

Definition at line 119 of file ndfd18.pl.

printf updatetime::Last Updated on s UnixDate ( creationdate,
"%b %  d,
%I:%M%p%Z"   
)
Type Constraints
foreach my $time ( sort keys%$  result  ) 

Definition at line 148 of file ndfd18.pl.


Variable Documentation

use strict

Definition at line 2 of file ndfd18.pl.

use warnings

Definition at line 3 of file ndfd18.pl.

use English

Definition at line 5 of file ndfd18.pl.

use Cwd abs_path

Definition at line 7 of file ndfd18.pl.

use lib usr share mythtv mythweather scripts usr local share mythtv mythweather scripts us_nws

Definition at line 9 of file ndfd18.pl.

Definition at line 12 of file ndfd18.pl.

Definition at line 13 of file ndfd18.pl.

my $name = 'NDFD-18_Hour'

Definition at line 20 of file ndfd18.pl.

my $version = 0.5

Definition at line 21 of file ndfd18.pl.

my $author = 'Gavin Hurlbut / Lucien Dunning'

Definition at line 22 of file ndfd18.pl.

my $email = 'gjhurlbu@gmail.com / ldunning@gmail.com'

Definition at line 23 of file ndfd18.pl.

my $updateTimeout = 15*60

Definition at line 24 of file ndfd18.pl.

my $retrieveTimeout = 30

Definition at line 25 of file ndfd18.pl.

my types
Initial value:
 ('18hrlocation',  'updatetime', 
        'temp-0', 'temp-1', 'temp-2', 'temp-3', 'temp-4', 'temp-5',
        '18icon-0', '18icon-1', '18icon-2', '18icon-3', '18icon-4', '18icon-5',
        'pop-0', 'pop-1', 'pop-2', 'pop-3', 'pop-4', 'pop-5',
        'time-0', 'time-1', 'time-2', 'time-3', 'time-4', 'time-5',
        'copyright', 'copyrightlogo')

Definition at line 26 of file ndfd18.pl.

my $dir = './'

Definition at line 32 of file ndfd18.pl.

my $icon_file = dirname(abs_path($0 or $PROGRAM_NAME)) . "/icons"

Definition at line 33 of file ndfd18.pl.

my $locstr = shift

Definition at line 71 of file ndfd18.pl.

my $units = $opt_u

Definition at line 72 of file ndfd18.pl.

my $param
Initial value:
 { maxt => 0,
    mint =>0,
    temp =>1,
    dew=>0,
    pop12=>1,
    qpf=>0,
    sky=>0,
    snow=>0,
    wspd=>0,
    wdir=>0,
    wx=>0, 
    waveh=>0,
    icons=>1,
    rh=>0,
    appt=>0 }

Definition at line 79 of file ndfd18.pl.

my $d1 = UnixDate("now", "%O")

Definition at line 95 of file ndfd18.pl.

my $d2 = UnixDate(DateCalc($d1, "+ 18 hours"), "%O")

Definition at line 96 of file ndfd18.pl.

my $result

Definition at line 97 of file ndfd18.pl.

my $creationdate

Definition at line 98 of file ndfd18.pl.

my $nextupdate

Definition at line 99 of file ndfd18.pl.

my $getData = 1

Definition at line 100 of file ndfd18.pl.

my $index = 0

Definition at line 141 of file ndfd18.pl.

my $icon

Definition at line 142 of file ndfd18.pl.

print copyrightlogo::none n

Definition at line 143 of file ndfd18.pl.

my $pop12

Definition at line 147 of file ndfd18.pl.

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Properties Friends
Generated on Tue Apr 15 06:42:23 2014 for MythTV by  doxygen 1.6.3