Help for this page
my ($out,$err) = $self->{connected}->capture2($params->{cmd});
cd /home/sitest/Scripts..... tclsh test_script.tcl ./check_network.pl