There are a few ways by which you could achieve this functionality ...

The first would be to continue using Net::Telnet and incorporate usage of the Expect module to respond to the shell prompts with the appropriate commands. The problem with this approach is that the root password of the destination server must be stored in the Perl script and is transmitted over the wire in an unencrypted form.

There are two ways by which this transmission of the root password in an unencrypted form could be avoided - The first would be to install SSH on the destination server and make use of the Net::SSH::Perl module in place of Net::Telnet. Alternatively, you could install sudo on your destination server which would allow you to assign permissive rights to non-root users to perform privileged tasks.

I believe your best bet would be to make use of both Net::SSH::Perl and sudo to achieve your desired goal in a direct and secure fashion.

 

perl -e 'print+unpack("N",pack("B32","00000000000000000000000111000111")),"\n"'

In reply to Re: shutting down a linux-server by rob_au
in thread shuting down a linux-server by NorthenMonk

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.