Yes. This is what I am looking for. This is what I have so far; what I am trying to do is log into several remote host and check for an existing entry, and change the whole line. If one does not exist then add it to the file. 
#!/usr/bin/perl -w

use strict;
use Net::SSH::Perl;

my $rcmd = "
        perl -e 'use strict; open(FD, filetochange.txt) or die \"can n
+ot open FD: $!\";
        while (<FD>) {
                if (/mon/ &&  /messages/) {
                        print $_;
                        #change line here
                }
        }
        close(FD);
'";


my $ssh = Net::SSH::Perl->new('localhost', protocol=>('2,1'));

$ssh->login('joe1','blabla');

my($stdout, $stderr, $exit) = $ssh->cmd("$rcmd");

print $stdout;

[download]
But I am getting this error: 
Use of uninitialized value in concatenation (.) or string at ./hash_ms
+gstab.pl line 6

[download]
Any idea? or does some one have a better idea of loging into a remote box and running an inline script on it? Thanks.

In reply to Re^2: replace a line when regex match... by perlknight
in thread replace a line when regex match... by perlknight

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.