You need to move the declaration of @commands_run out of the foreach loop - otherwise it gets created afresh on each iteration of the loop. And in your code there seems to be some confusion about the name of the variable that contains the command. Is it $command1 or $command_run? Looks like $command_run contains the result of running $command1.

But once those little issues are sorted out, something very similar to your code will work just fine.

my @commands_run; foreach my $command1 (@commands) { chomp $command1; my $command_run = $ssh->exec($command1); print $command_run; push @commands_run, $command1; } print @commands_run;

Update: Actually, once that code has been run there will be no difference between @commands and commands_run. What were you expecting?

--

See the Copyright notice on my home node.

Perl training courses


In reply to Re: sending commands to CLI and then appending to end of array with push by davorg
in thread sending commands to CLI and then appending to end of array with push by sqspat

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":



  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.