07-31-2008
Thanks
You are awesome man. It worked like a charm ...
Thank you very much
10 More Discussions You Might Find Interesting
1. UNIX for Advanced & Expert Users
Hi,
Just recently we seem to be getting the following error message relating to SSH when we run the UNIX script in background mode:
warning: You have no controlling tty. Cannot read confirmation.^M
warning: Authentication failed.^M
Disconnected; key exchange or algorithm negotiation... (1 Reply)
Discussion started by: budrito
1 Replies
2. UNIX for Dummies Questions & Answers
Hi Floks!
This is Sravan!
I am new to linux and I am trying to write bash shell script in which I want to change the user but the statements which are after the "su " command are not working that I mean I want to execute some statements as the changed user
here is the code
... (2 Replies)
Discussion started by: sravanp
2 Replies
3. AIX
I thought I had seen all errors in SSH but the following is new to me:
buffer_get: trying to get more bytes 129 than in buffer 6
Anyone seen this before please? Google search returns nothing of use that I can see.
I am running an lpar on a 52A and the O/S is AIX 5.3 TL 4CSP. (2 Replies)
Discussion started by: johnf
2 Replies
4. Solaris
Hi,
I am trying to ssh to a server.
Senario is as below:
I have two servers A and B both are solaris and having ssh version
Sun_SSH_1.1, SSH protocols 1.5/2.0, OpenSSL
I have created proper keys on both using key-gen and copied public keys appropriatly.
I am able to ssh from A to B... (1 Reply)
Discussion started by: Muktesh
1 Replies
5. Shell Programming and Scripting
I'm writing a script which is meant to ssh into a remote machine, sed a file there, and write the output to a new file on the remote machine. Obviously the easy way to do this is to write and execute the script on the remote machine, but I'm trying to do this all via ssh since I like to keep and... (4 Replies)
Discussion started by: maethlin
4 Replies
6. Shell Programming and Scripting
Hi,
I have 2 users say user a and user b both in different unix boxes.
I thave to execute a script in user b via user a.
I tried using ssh for it but my script is not getting executed.
My script goes as:
from user a-
ssh userb@host " sh script.sh"
script.sh is placed in user b... (11 Replies)
Discussion started by: Taranjeet Singh
11 Replies
7. Shell Programming and Scripting
Hi,
When runnin the following script it complte successfully with out any problem
#!/bin/sh
SERV="crm1"
for s in $SERV
do
export WebLogicSessions=`ssh psoft@$s "cd /software/psoft/scripts ; ./getweblogicsessions.sh crm1 8001 PIA | awk '{print $1}' `
echo "Checking number of... (0 Replies)
Discussion started by: yoavbe
0 Replies
8. UNIX for Dummies Questions & Answers
Hi i m writing a script which will fetch data from different machines and display it on single terminal.
I have created a file named SERVERNAMES containing ip address of machines i need to monitor.
Then for every IP i m issuing ssh command to get date on that machine.
However When i m trying... (3 Replies)
Discussion started by: pinga123
3 Replies
9. Solaris
Hi Guys,
when I try to login to one of my sun server (sparc) from within an open putty session on another server I get this message:
bash-3.2$ ssh 10.0.0.10
@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@
@ WARNING: REMOTE HOST IDENTIFICATION HAS CHANGED! @... (1 Reply)
Discussion started by: cjashu
1 Replies
10. Shell Programming and Scripting
I want to execute below the script for remote server.i am not able to execute below the script please help me urgent for this issue.i getting below the error
ssh user@server<<EOJ
cd path
for i in *
do
echo $i
done
EOJ
Pseudo-terminal will not be allocated because stdin is not a... (1 Reply)
Discussion started by: SAUD PASHA
1 Replies
LEARN ABOUT MOJAVE
data::dumper::concise::sugar5.18
Data::Dumper::Concise::Sugar(3) User Contributed Perl Documentation Data::Dumper::Concise::Sugar(3)
NAME
Data::Dumper::Concise::Sugar - return Dwarn @return_value
SYNOPSIS
use Data::Dumper::Concise::Sugar;
return Dwarn some_call(...)
is equivalent to:
use Data::Dumper::Concise;
if (wantarray) {
my @return = some_call(...);
warn Dumper(@return);
return @return;
} else {
my $return = some_call(...);
warn Dumper($return);
return $return;
}
but shorter. If you need to force scalar context on the value,
use Data::Dumper::Concise::Sugar;
return DwarnS some_call(...)
is equivalent to:
use Data::Dumper::Concise;
my $return = some_call(...);
warn Dumper($return);
return $return;
If you need to force list context on the value,
use Data::Dumper::Concise::Sugar;
return DwarnL some_call(...)
is equivalent to:
use Data::Dumper::Concise;
my @return = some_call(...);
warn Dumper(@return);
return @return;
If you want to label your output, try DwarnN
use Data::Dumper::Concise::Sugar;
return DwarnN $foo
is equivalent to:
use Data::Dumper::Concise;
my @return = some_call(...);
warn '$foo => ' . Dumper(@return);
return @return;
If you want to output a reference returned by a method easily, try $Dwarn
$foo->bar->{baz}->$Dwarn
is equivalent to:
my $return = $foo->bar->{baz};
warn Dumper($return);
return $return;
If you want to format the output of your data structures, try DwarnF
my ($a, $c) = DwarnF { "awesome: $_[0] not awesome: $_[1]" } $awesome, $cheesy;
is equivalent to:
my @return = ($awesome, $cheesy);
warn DumperF { "awesome: $_[0] not awesome: $_[1]" } $awesome, $cheesy;
return @return;
If you want to immediately die after outputting the data structure, every Dwarn subroutine has a paired Ddie version, so just replace the
warn with die. For example:
DdieL 'foo', { bar => 'baz' };
DESCRIPTION
use Data::Dumper::Concise::Sugar;
will import Dwarn, $Dwarn, DwarnL, DwarnN, and DwarnS into your namespace. Using Exporter, so see its docs for ways to make it do something
else.
Dwarn
sub Dwarn { return DwarnL(@_) if wantarray; DwarnS($_[0]) }
$Dwarn
$Dwarn = &Dwarn
$DwarnN
$DwarnN = &DwarnN
DwarnL
sub Dwarn { warn Data::Dumper::Concise::Dumper @_; @_ }
DwarnS
sub DwarnS ($) { warn Data::Dumper::Concise::Dumper $_[0]; $_[0] }
DwarnN
sub DwarnN { warn '$argname => ' . Data::Dumper::Concise::Dumper $_[0]; $_[0] }
Note: this requires Devel::ArgNames to be installed.
DwarnF
sub DwarnF (&@) { my $c = shift; warn &Data::Dumper::Concise::DumperF($c, @_); @_ }
TIPS AND TRICKS
global usage
Instead of always just doing:
use Data::Dumper::Concise::Sugar;
Dwarn ...
We tend to do:
perl -MData::Dumper::Concise::Sugar foo.pl
(and then in the perl code:)
::Dwarn ...
That way, if you leave them in and run without the "use Data::Dumper::Concise::Sugar" the program will fail to compile and you are less
likely to check it in by accident. Furthmore it allows that much less friction to add debug messages.
method chaining
One trick which is useful when doing method chaining is the following:
my $foo = Bar->new;
$foo->bar->baz->Data::Dumper::Concise::Sugar::DwarnS->biff;
which is the same as:
my $foo = Bar->new;
(DwarnS $foo->bar->baz)->biff;
SEE ALSO
You probably want Devel::Dwarn, it's the shorter name for this module.
perl v5.18.2 2013-12-31 Data::Dumper::Concise::Sugar(3)