On 9/4/07, ppp ppp <[EMAIL PROTECTED]> wrote:
>
> Hi All,
>
>I want to remove some packages install on remote solaris through
> script. I am able to run simple command like ls -l ,ls through perl script by
> using Net::Telnet module.
>
> Now I want my script should remove all the packag
ose();
}
Please note this hasn't been run.
-Original Message-
From: Andrew Curry [mailto:[EMAIL PROTECTED]
Sent: 04 September 2007 15:57
To: ppp ppp; beginners@perl.org
Subject: RE: Want to interactively run a shell script
Something along this usually works to interact with program
Something along this usually works to interact with programs through perl,
this could be edited for your purpose.
This does a simple tail but you can guess the rest.
#!/usr/local/bin/perl -w
use Data::Dumper;
use File::Copy;
use IPC::Open3;
use IO::Select;
use IO::Handle;
use strict;
use vars qw(
