Permalink
Browse files

break out exec of ssh into its own method

  • Loading branch information...
1 parent 6337f1b commit 528bb489b10d79dd9a762d1319f890eaf5dc29de @grantm committed Jun 3, 2010
Showing with 8 additions and 1 deletion.
  1. +8 −1 bin/bcvi
View
@@ -760,7 +760,14 @@ sub wrap_ssh {
warn "bcvi: unable to extract hostname from ssh command line\n";
@args_out = @orig;
}
- system 'ssh', @args_out;
+ $self->execute_ssh(@args_out);
+}
+
+
+sub execute_ssh {
+ my($self, @args) = @_;
+
+ system 'ssh', @args;
}

0 comments on commit 528bb48

Please sign in to comment.