diff options
| author | Josh Rahm <rahm@google.com> | 2021-11-08 09:43:39 -0700 |
|---|---|---|
| committer | Josh Rahm <rahm@google.com> | 2021-11-08 09:43:39 -0700 |
| commit | 909665a8e8938de4e6f62b2da3e32f6597b3a8a5 (patch) | |
| tree | fb697ba94b73283ce4dcc962e7ae87df02bf230b /extras/HOME/.xmonad | |
| parent | 278cf20058ad788676a7abe82a65083f41f84e17 (diff) | |
| parent | efef2ad31b0a1ce7ebcc2a635114f5a1d3f82ec8 (diff) | |
| download | rde-master.tar.gz rde-master.tar.bz2 rde-master.zip | |
Merge remote-tracking branch 'josher/master'master
Diffstat (limited to 'extras/HOME/.xmonad')
| -rwxr-xr-x | extras/HOME/.xmonad/xmobar-weather | 9 |
1 files changed, 3 insertions, 6 deletions
diff --git a/extras/HOME/.xmonad/xmobar-weather b/extras/HOME/.xmonad/xmobar-weather index d9dc88b..e8ce28e 100755 --- a/extras/HOME/.xmonad/xmobar-weather +++ b/extras/HOME/.xmonad/xmobar-weather @@ -1,18 +1,16 @@ #!/usr/bin/perl -use LWP::Simple; use Time::Local; use POSIX; -$content = get("https://ipinfo.io"); +$content = `curl https://ipinfo.io`; die "Unable to get IP info" unless defined $content; ($city, $lat, $lon) = ($content =~ m/.*"city":\s+"([^"]+)".*"loc":\s+"(-?[0-9.]+),(-?[0-9.]+).*"/ims); -$content = get( - "https://api.sunrise-sunset.org/json?lat=$lat&lng=$lon&formatted=0"); +$content = `curl "https://api.sunrise-sunset.org/json?lat=$lat&lng=$lon&formatted=0"`; die "Unable to get sunrise/sunset data" unless defined $content; @@ -22,8 +20,7 @@ $sunrise_str =~ s#.*"sunrise":"([^"]*)".*#\1#; $sunset_str =~ s#.*"sunset":"([^"]*)".*#\1#; $current_str=strftime "%Y-%m-%dT%H:%M:%S+00:00", gmtime(); -$content = get( - "https://tgftp.nws.noaa.gov/data/observations/metar/decoded/KLMO.TXT"); +$content = `curl "https://tgftp.nws.noaa.gov/data/observations/metar/decoded/KLMO.TXT"`; die "Unable to get weather data" unless defined $content; |