yrnoxml.pl File Reference

Go to the source code of this file.

Functions

use POSIX qw (strftime)
 our ($opt_v, $opt_t, $opt_T, $opt_l, $opt_u, $opt_d, $opt_D)
 binmode (STDOUT,":utf8")
 if (!-d $logdir)
 getopts ('Tvtlu:d:D')
 if (defined $opt_v)
 if (!(defined $opt_u &&defined $loc &&!$loc eq""))
 log_print ($logdir,"-u $units -d $dir $loc\n")
foreach $node ($nodeset->get_nodelist)
foreach my $hashref (@forecast)
for my $attr (sort keys%attrib)

Variables

use strict
use warnings
use utf8
use JSON
my $name = 'yrno-XML'
my $version = 0.4
my $author = 'Gavin Hurlbut'
my $email = 'gjhurlbu@gmail.com'
my $updateTimeout = 15*60
my $retrieveTimeout = 30
my types
my $dir = "/tmp/yrnoxml"
my $logdir = "/tmp/yrnoxml"
my images
my $loc = shift
my attrib
my $units = $opt_u
my $base_url
 $file
my $nodeset = $xp->find('/weatherdata/location/location')
my $node
my $tzoffset
$tzoffset *my $now = 60 time
my $lastperiod = undef
my forecast
my $day = 0
my $time = 0
 exit

Function Documentation

use POSIX qw ( strftime   ) 
our ( opt_v,
opt_t,
opt_T,
opt_l,
opt_u,
opt_d,
opt_D 
)
binmode ( STDOUT  ,
":utf8"   
)
if ( !-d logdir  ) 

Definition at line 76 of file yrnoxml.pl.

getopts ( 'Tvtlu:d:D'   ) 
if ( defined $  opt_v  ) 

Definition at line 104 of file yrnoxml.pl.

if ( defined $opt_u &&defined $loc &&!$loc eq""  ) 

Definition at line 111 of file yrnoxml.pl.

log_print ( logdir,
"-u $units -d $dir $loc\n  
)
foreach $node ( $nodeset->  get_nodelist  ) 

Definition at line 169 of file yrnoxml.pl.

foreach my $hashref ( forecast  ) 

Definition at line 179 of file yrnoxml.pl.

Referenced by $node().

for my $attr ( sort keys%  attrib  ) 

Definition at line 214 of file yrnoxml.pl.

Referenced by $attr().


Variable Documentation

use strict

Definition at line 4 of file yrnoxml.pl.

use warnings

Definition at line 5 of file yrnoxml.pl.

use encoding utf8
use JSON

Definition at line 14 of file yrnoxml.pl.

$name = 'yrno-XML'

Definition at line 21 of file yrnoxml.pl.

my $version = 0.4

Definition at line 22 of file yrnoxml.pl.

my $author = 'Gavin Hurlbut'

Definition at line 23 of file yrnoxml.pl.

my $email = 'gjhurlbu@gmail.com'

Definition at line 24 of file yrnoxml.pl.

my $updateTimeout = 15*60

Definition at line 25 of file yrnoxml.pl.

my $retrieveTimeout = 30

Definition at line 26 of file yrnoxml.pl.

my types
Initial value:
 ( '3dlocation',
              '6dlocation', 'altitude', 'cclocation', 'copyright', 'date-0',
              'date-1', 'date-2', 'date-3', 'date-4', 'date-5', 'geobaseid',
              'high-0', 'high-1', 'high-2', 'high-3', 'high-4', 'high-5',
              'low-0', 'low-1', 'low-2', 'low-3', 'low-4', 'low-5',
              'icon-0', 'icon-1', 'icon-2', 'icon-3', 'icon-4', 'icon-5',
              'latitude', 'longitude', 'observation_time', 
              '18hrlocation', 
              '18icon-0', '18icon-1', '18icon-2', 
              '18icon-3', '18icon-4', '18icon-5', 
              'temp-0', 'temp-1', 'temp-2', 'temp-3', 'temp-4', 'temp-5', 
              'time-0', 'time-1', 'time-2', 'time-3', 'time-4', 'time-5', 
              'pop-0', 'pop-1', 'pop-2', 'pop-3', 'pop-4', 'pop-5',
              'updatetime', 'station_id', 'copyrightlogo' )

Definition at line 27 of file yrnoxml.pl.

my $dir = "/tmp/yrnoxml"

Definition at line 41 of file yrnoxml.pl.

my $logdir = "/tmp/yrnoxml"

Definition at line 42 of file yrnoxml.pl.

my images
Initial value:
 ( "partly cloudy" => "pcloudy.png", "cloudy" => "cloudy.png",
               "sleet" => "rainsnow.png", "fair" => "fair.png", 
               "snow" => "flurries.png", "rain" => "showers.png",
               "sunny" => "sunny.png", "fog" => "fog.png",
               "mostly cloudy" => "mcloudy.png", 
               "rain showers" => "lshowers.png", "heavy rain" => "showers.png",
               "thunder showers" => "thunshowers.png",
               "unknown" => "unknown.png" )

Definition at line 43 of file yrnoxml.pl.

Referenced by MainServer::HandleMusicFindAlbumArt(), ImageLoader::LoadAnimatedImage(), SubtitleScreen::RenderAssTrack(), and MythUIImage::SetAnimationFrames().

my $loc = shift

Definition at line 110 of file yrnoxml.pl.

my attrib

Definition at line 115 of file yrnoxml.pl.

Referenced by VAAPIContext::InitContext(), and VAAPIContext::SetPictureAttribute().

my $units = $opt_u

Definition at line 116 of file yrnoxml.pl.

my $base_url
Initial value:
 'http:
my $file = $loc

Definition at line 120 of file yrnoxml.pl.

$file
Initial value:
~ s/\

my $xp = getCachedXML($base_url . $loc . "/forecast.xml", $dir, $file . ".xml",
                      $updateTimeout, $logdir)

Definition at line 122 of file yrnoxml.pl.

$nodeset = $xp->find('/weatherdata/location/location')

Definition at line 127 of file yrnoxml.pl.

foreach $node

Definition at line 130 of file yrnoxml.pl.

my $tzoffset

Definition at line 152 of file yrnoxml.pl.

$tzoffset* my $now = 60 time

Definition at line 160 of file yrnoxml.pl.

my $lastperiod = undef

Definition at line 166 of file yrnoxml.pl.

Definition at line 167 of file yrnoxml.pl.

my $day = 0

Definition at line 177 of file yrnoxml.pl.

my $time = 0

Definition at line 178 of file yrnoxml.pl.

Referenced by $time().

 All Classes Namespaces Files Functions Variables Typedefs Enumerations Enumerator Properties Friends
Generated on Tue Jul 29 06:42:17 2014 for MythTV by  doxygen 1.6.3