12-22-2014
Thank you.
We have SFTP connection between Server1 and Server2.
Can I use that in my script for authentication and write the code to connect and to the server2 and execute some command in server2?
Regards,
Venu V Reddy
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hi friend
I have a command: sftp -v dtxsttp90102@dtx.us.dell.com
I need to connect sftp server using above command and grep for some files
and need to back to script
can anyone tell me how to write script
connectingSFTP.sh
--------------------
sftpCmd=`sftp -v... (1 Reply)
Discussion started by: kittusri9
1 Replies
2. Shell Programming and Scripting
i want to connect to a remote server through ssh.
i have to also provide password within that script.
after connecting to the remote server i want to do some operations like grep,cd etc
can u pls help me to wite a script.
Thanks (1 Reply)
Discussion started by: millan
1 Replies
3. Programming
Hello friends
I want to write a script in which I will connect to my friends network.
I want to use SSH.
Even they can use the script to log into my network and copy files.
ssh user@hostname command
I know the following command will help me to log into Google's servers and see all the... (12 Replies)
Discussion started by: Angelo
12 Replies
4. Shell Programming and Scripting
Hi Unix Gurus,
I have a doubt reg file transfer. I have used the below script to connect to another server and find files having modified for the last 24 hours and have to move the file to another server.
While i tried i am getting authentication failed, destination path not found issue.
... (2 Replies)
Discussion started by: incepted
2 Replies
5. Shell Programming and Scripting
Hi all,
I need to connect to SQL server from shell script. Then need to execute queries from shell script. Kindly let me know on how to do this
Thanks,
Ananthi.U (1 Reply)
Discussion started by: ananthi_ku
1 Replies
6. Solaris
Hi all,
I need to connect to SQL server from shell script. Then need to execute queries from shell script as below
1. To compare values of an array with SQL table's entry.
Kindly let me know on how to do this
Thanks,
Double post. Continue here (0 Replies)
Discussion started by: amitbhelave
0 Replies
7. Shell Programming and Scripting
Hi all,
I need to connect to SQL server from shell script. Then need to execute queries from shell script as below
1. To compare values of an array with SQL table's entry.
I am using solaris-5.1 to run shell script and want to connect to SQL-5.1 which is installed on SantOS.
Kindly let... (3 Replies)
Discussion started by: amitbhelave
3 Replies
8. Shell Programming and Scripting
I am trying to connect to Windows server via Linux server through a script and run two commands " cd and ls " But its giving me error saying " could not start the program" followed by the command name i specify e g : "cd"
i am trying in this manner "
ssh username@servername "cd... (5 Replies)
Discussion started by: sunil seelam
5 Replies
9. Shell Programming and Scripting
I have a script, which connecting to remote server and first checks, if the files are there by timestamp. If not I want the script exit without error. Below is a code
TARFILE=${NAME}.tar
TARGZFILE=${NAME}.tar.gz
ssh ${DESTSERVNAME} 'cd /export/home/iciprod/download/let/monthly;... (3 Replies)
Discussion started by: digioleg54
3 Replies
10. Shell Programming and Scripting
Hi,
I am facing an issue in connecting to database from Linux shell script. Here is my code
export ORACLE_BASE=xxx
export ORACLE_SID=xxx
export ORACLE_HOME=xxxx
DB_PATH=xxx/'yyy@yy'
UserId=`sqlplus -s $DB_PATH <<EOF
set head off feedback off
select max(USER_ID)+1 from USERS;... (6 Replies)
Discussion started by: yuvi
6 Replies
LEARN ABOUT DEBIAN
test::tcp
Test::TCP(3pm) User Contributed Perl Documentation Test::TCP(3pm)
NAME
Test::TCP - testing TCP program
SYNOPSIS
use Test::TCP;
my $server = Test::TCP->new(
code => sub {
my $port = shift;
...
},
);
my $client = MyClient->new(host => '127.0.0.1', port => $server->port);
undef $server; # kill child process on DESTROY
Using memcached:
use Test::TCP;
my $memcached = Test::TCP->new(
code => sub {
my $port = shift;
exec $bin, '-p' => $port;
die "cannot execute $bin: $!";
},
);
my $memd = Cache::Memcached->new({servers => ['127.0.0.1:' . $memcached->port]});
...
And functional interface is available:
use Test::TCP;
test_tcp(
client => sub {
my ($port, $server_pid) = @_;
# send request to the server
},
server => sub {
my $port = shift;
# run server
},
);
DESCRIPTION
Test::TCP is test utilities for TCP/IP programs.
METHODS
empty_port
my $port = empty_port();
Get the available port number, you can use.
test_tcp
Functional interface.
test_tcp(
client => sub {
my $port = shift;
# send request to the server
},
server => sub {
my $port = shift;
# run server
},
# optional
port => 8080
);
wait_port
wait_port(8080);
Waits for a particular port is available for connect.
OO-ish interface
my $server = Test::TCP->new(%args);
Create new instance of Test::TCP.
Arguments are following:
$args{auto_start}: Boolean
Call "$server->start()" after create instance.
Default: true
$args{code}: CodeRef
The callback function. Argument for callback function is: "$code->($pid)".
This parameter is required.
$server->start()
Start the server process. Normally, you don't need to call this method.
$server->stop()
Stop the server process.
my $pid = $server->pid();
Get the pid of child process.
my $port = $server->port();
Get the port number of child process.
FAQ
How to invoke two servers?
You can call test_tcp() twice!
test_tcp(
client => sub {
my $port1 = shift;
test_tcp(
client => sub {
my $port2 = shift;
# some client code here
},
server => sub {
my $port2 = shift;
# some server2 code here
},
);
},
server => sub {
my $port1 = shift;
# some server1 code here
},
);
Or use OO-ish interface instead.
my $server1 = Test::TCP->new(code => sub {
my $port1 = shift;
...
});
my $server2 = Test::TCP->new(code => sub {
my $port2 = shift;
...
});
# your client code here.
...
How do you test server program written in other languages like memcached?
You can use "exec()" in child process.
use strict;
use warnings;
use utf8;
use Test::More;
use Test::TCP 1.08;
use File::Which;
my $bin = scalar which 'memcached';
plan skip_all => 'memcached binary is not found' unless defined $bin;
my $memcached = Test::TCP->new(
code => sub {
my $port = shift;
exec $bin, '-p' => $port;
die "cannot execute $bin: $!";
},
);
use Cache::Memcached;
my $memd = Cache::Memcached->new({servers => ['127.0.0.1:' . $memcached->port]});
$memd->set(foo => 'bar');
is $memd->get('foo'), 'bar';
done_testing;
AUTHOR
Tokuhiro Matsuno <tokuhirom@gmail.com>
THANKS TO
kazuhooku
dragon3
charsbar
Tatsuhiko Miyagawa
lestrrat
SEE ALSO
LICENSE
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
perl v5.14.2 2012-02-01 Test::TCP(3pm)