diff --git a/huectl.pl b/huectl.pl index 1bf846b..f1b0e8f 100755 --- a/huectl.pl +++ b/huectl.pl @@ -67,7 +67,6 @@ END_USAGE my ($bridgename) = @ARGV; if (!$bridgename) { _return_error_with($USAGE); } -#my @config_files = map { -e $_ ? $_ : () } ('./hue.conf', './.hue.conf', '/etc/hue.conf', "$ENV{'HOME'}/.hue.conf", "$ENV{'HOME'}/hue.conf"); my @config_files = grep { -e } ('./hue.conf', './.hue.conf', '/etc/hue.conf', "$ENV{'HOME'}/.hue.conf", "$ENV{'HOME'}/hue.conf"); my $config = Config::Tiny->read($config_files[-1], 'utf8'); my $bridge = $config->{$bridgename}{ip} || _return_error_with("$USAGE\nError: bridge-name '$bridgename' not found.\n");