Re^21: expect.pm header


Clear questions and runnable code get the best and fastest answer
	PerlMonks

Re^21: expect.pm header

by sn1987a (Deacon)

on Apr 10, 2015 at 15:39 UTC ( [id://1123048]=note: print w/replies, xml )

Need Help??

in reply to Re^20: expect.pm header
in thread expect.pm header

I am sorry to hear about your son. I hope he is feeling better today.

You are just missing the call to print_log_file. Find the place in your code where you have:

my $my_header = $header;
$my_header =~ s/system/$system/;
$ssh->expect ( $timeout,
[download]

and add the line as shown below:

my $my_header = $header;
$my_header =~ s/system/$system/;
$ssh->print_log_file($my_header); # This line needs to added here <<<<
+<<<
$ssh->expect ( $timeout,
[download]

Comment on Re^21: expect.pm header Select or Download Code

Replies are listed 'Best First'.

Re^22: expect.pm header
by amagana (Acolyte) on Apr 10, 2015 at 19:14 UTC

Thank you! I can see the header now I just need to practice more with how to format in perl I really want to do that well.

This is what my header looks like in my log file and you can now see where the header is, I really thank you for your help I learn by seeing working examples and then analyze how it works.

$ ^M
^M
======= remotehost03 =======^M
^M
  You are accessing a U.S. Government (USG) Information System (IS)
[download]

Oh! I was wondering is it possible to get my script to die if the password is not the right one initially and just keep going to the next box? And it reports to me a list of servers that failed but the script still keeps going?

[reply]
[d/l]

In Section Seekers of Perl Wisdom

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

node history
Node Type: note [id://1123048]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others lurking in the Monastery: (3)

As of 2024-04-26 06:08 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found