Mercurial > hg > egg-tcls
comparison fetch_weather.pl @ 325:fe12434d6cbd
weather: Bump version.
author | Matti Hamalainen <ccr@tnsp.org> |
---|---|
date | Thu, 21 May 2015 10:00:59 +0300 |
parents | 19c64798de91 |
children | b8ae5e99341b |
comparison
equal
deleted
inserted
replaced
324:19c64798de91 | 325:fe12434d6cbd |
---|---|
415 ### Main program begins | 415 ### Main program begins |
416 ### | 416 ### |
417 my $weatherdata = {}; | 417 my $weatherdata = {}; |
418 | 418 |
419 die( | 419 die( |
420 "Weather Fetch v0.1 by ccr/TNSP <ccr\@tnsp.org>\n". | 420 "Weather Fetch v0.3 by ccr/TNSP <ccr\@tnsp.org>\n". |
421 "Usage: $0 <config file>\n" | 421 "Usage: $0 <config file>\n" |
422 ) unless scalar(@ARGV) >= 1; | 422 ) unless scalar(@ARGV) >= 1; |
423 | 423 |
424 my $cfgfile = shift; | 424 my $cfgfile = shift; |
425 opt_read_config($cfgfile) == 0 or die("Errors while parsing configuration file '".$cfgfile."'.\n"); | 425 opt_read_config($cfgfile) == 0 or die("Errors while parsing configuration file '".$cfgfile."'.\n"); |