print $chan2 "$cmd \n";