Select Code to Download

sub ops_do_ssh_shell {
   my ($cmd) = @_;
#etc ...
}

sub ops_do_ssh_shell {
   my ($cmd) = @_;
...

   return $cmd;
}

my $cmd_status = ops_do_ssh_shell($cmd);

my @commands = (
   { name => 'command_name1',
...
      }
   }
}