sub checkStatus { my ($routerName, $ssh) = @_; ...