resolve hostname as argument

diff --git a/dell-switch.pl b/dell-switch.pl
index efff4ba..f314132 100755 (executable)
--- a/dell-switch.pl
+++ b/dell-switch.pl
@@ -17,6 +17,7 @@ require 'config.pl';
 #$Net::OpenSSH::debug = ~0;
 
 my $ip = shift @ARGV || die "usage: $0 IP command[ command ...]\n";
+$ip = $1 if `host $ip` =~ m/has address (\S+)/;
 my @commands = @ARGV;
 @commands = <DATA> unless @commands;