03-04-2010
Ksh..
Quote:
Originally Posted by
TonyLawrence
Do it with Perl, not a shell script.
See examples at my
Perl Net::FTP
Hi Tony,
Thanks for ur reply..I am not working with Perl..I need it in ksh only
10 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
im using bourne shell
In file scriptA i add a new function, test_return()
test_return()
{
a=1
return $a
}
when i try execute ,
a='/''/scriptA test_return
echo $a
its give me error..
scriptA: cannot return when not in function
ist any solution for this problem..
How... (1 Reply)
Discussion started by: neruppu
1 Replies
2. Shell Programming and Scripting
I have a automated FTP script that gets a file using mget. I am using mget because the date will change on the file frequently. The mget works, however if I incorrectly type the file (e.g. if I want to get /dog123 and I enter /dg*) I do not receive and error code from in the FTP session. The... (1 Reply)
Discussion started by: dog123
1 Replies
3. Shell Programming and Scripting
Hi all,
I have two ksh scripts
#sample1.sh
#!/bin/ksh
. ./sample2.sh
echo $fileExist
#sample2.sh
#!/bin/ksh
func()
{
i=1
return $a
}
func
echo $?
Here how should I return the value of sample2.sh back to sample1.sh?
Thanks in advance. (2 Replies)
Discussion started by: gp_singh
2 Replies
4. Shell Programming and Scripting
Hello, I wanted to delete all files which are placed 14 days back. Here is my below script. My script works very well and it deletes all files 14 days back.
I wanted to display message incase if the delete script is not successful. The below script returns always successful. But the directory... (6 Replies)
Discussion started by: govindts
6 Replies
5. Shell Programming and Scripting
HI ,
Is there any way to return a value of variable from shell to perl script.
Code:
===
Perl file
my $diff1=system("sh diff.sh");
my $diff2=system("sh diff1.sh");
I need exit status of below commands
i.e 0 and 1 respectively.
Since in both the cases diff is working so system... (3 Replies)
Discussion started by: srkelect
3 Replies
6. Shell Programming and Scripting
Hi,
I need to edit a shell script which is calling another shell script. At the moment the program returns to the command prompt after executing each called script. I need to change it to make it return to the calling script so that the user is able to make another choice to execute the next... (11 Replies)
Discussion started by: PTL
11 Replies
7. Shell Programming and Scripting
Hi,
Im new to DB2.
I need to connect to DB2 from shell script and return the query output back to shell script variable.
this is my code
#!/bin/ksh
db_name=db
db_user=usr
db_pwd=pwd
db2 <<EOSQL
connect to $db_name user $db_user using "$db_pwd"
select count(1) from table
quit
EOSQL ... (3 Replies)
Discussion started by: sup
3 Replies
8. Shell Programming and Scripting
Hi All,
There are 2 scripts A and B.
A --> It will invoke script B
B -->
It will generate below output.
100 - connected
105 - Not Connected
210 - Connected
I want to return this value to script A. Please advice. (4 Replies)
Discussion started by: Girish19
4 Replies
9. Shell Programming and Scripting
Hi, I need to send the return code from a script to the parent shell script.
But i am suppressing outputs while calling the child script.
Is there any way still to get the return code from the child script with suppress output.
Below is my script:
I am using :$ while calling return.sh... (5 Replies)
Discussion started by: usrrenny
5 Replies
10. UNIX for Beginners Questions & Answers
Hi All,
I'm new to unix and I have a requirement to execute a shell script and get the return code/Exit code and send it in email. Meaninig we execute a script which in turn execute a shel script and fetches it\s return code and send it to email. I tried the code below as :
... (2 Replies)
Discussion started by: midhun3108
2 Replies
LEARN ABOUT DEBIAN
net::openssh::compat::perl
Net::OpenSSH::Compat::Perl(3pm) User Contributed Perl Documentation Net::OpenSSH::Compat::Perl(3pm)
NAME
Net::OpenSSH::Compat::Perl - Net::OpenSSH adapter for Net::SSH::Perl API compatibility
SYNOPSIS
use Net::OpenSSH::Compat::Perl qw(:supplant);
use Net::SSH::Perl;
my $ssh = Net::SSH::Perl->new('host');
$ssh->login($user, $passwd);
my ($out, $err, $rc) = $ssh->cmd($cmd);
DESCRIPTION
This module implements a subset of Net::SSH::Perl API on top of Net::OpenSSH.
After the module is loaded as...
use Net::OpenSSH::Compat::Perl qw(:supplant);
... it supplants the Net::SSH::Perl module as if it were installed on the machine using Net::OpenSSH under the hood to handle SSH
operations.
Setting defaults
The hash %Net::OpenSSH::Compat::Perl::DEFAULTS can be used to set default values for Net::OpenSSH and other modules called under the hood
and otherwise not accesible through the Net::SSH::Perl API.
The entries currently supported are:
connection => [ %opts ]
Extra options passed to "Net::OpenSSH::new" constructor.
Example:
$Net::OpenSSH::Compat::SSH::Perl::DEFAULTS{connection} =
[ ssh_path => "/opt/SSH/bin/ssh" ];
BUGS AND SUPPORT
This is a work in progress.
"register_handler" method is not supported.
Net::SSH::Perl submodules (i.e. Net::SSH::Perl::Channel) are not emulated.
Anyway, if your Net::SSH::Perl script fails, fill a bug report at the CPAN RT bugtracker
(https://rt.cpan.org/Ticket/Create.html?Queue=Net-OpenSSH-Compat <https://rt.cpan.org/Ticket/Create.html?Queue=Net-OpenSSH-Compat>) or just
send me an e-mail with the details.
Include at least:
1 - The full source of the script
2 - A description of what happens in your machine
3 - What you thing it should be happening
4 - What happens when you use the real Net::SSH::Perl
5 - The version and name of your operating system
6 - The version of the OpenSSH ssh client installed on your machine ("ssh -V")
7 - The Perl version ("perl -V")
8 - The versions of the Perl packages Net::OpenSSH, IO::Pty and this Net::OpenSSH::Compat.
Git repository
The source code repository is at https://github.com/salva/p5-Net-OpenSSH-Compat <https://github.com/salva/p5-Net-OpenSSH-Compat>.
My wishlist
If you like this module and you're feeling generous, take a look at my Amazon Wish List: <http://amzn.com/w/1WU1P6IR5QZ42>
Also consider contributing to the OpenSSH project this module builds upon: <http://www.openssh.org/donations.html>.
COPYRIGHT AND LICENSE
Copyright (C) 2011 by Salvador Fandin~o (sfandino@yahoo.com)
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.10.0 or,
at your option, any later version of Perl 5 you may have available.
perl v5.14.2 2012-02-24 Net::OpenSSH::Compat::Perl(3pm)