ish Pathak; Troy May; Bill Lyles; [EMAIL PROTECTED];
[EMAIL PROTECTED]
Subject: RE: Can someone Help me out with this
I don't know if this is the most efficient way to do it, but it worked.
#!C:\Perl\bin\perl.exe -w
use strict;
my $infile = qq(C\:\\cmd.txt);
my $outfile = qq(C\:\\cmdout.tx
blue light special on aisle #6
close(IN); # we've got the suspect surrounded
1;
Scot R.
-Original Message-
From: Avanish Pathak [mailto:[EMAIL PROTECTED]]
Sent: Friday, May 24, 2002 2:02 AM
To: Troy May; Bill Lyles; [EMAIL PROTECTED];
[EMAIL PROTECTED]
Subject: Can someone Help me out wi
you should try this.
$old="abcdef";
$new="lmnop";
$ci_cmd1 = s/$old/$new/;#this substitutes the old value with the
new one.
regards,
Ian
David Gray wrote:
> > Problem:
> > ci_cmd1="abcdef", // line1
> > ci_cmd2="ghijk", // line2
> > ci_cmd3="lmnop", // l
> Problem:
> ci_cmd1="abcdef", // line1
> ci_cmd2="ghijk", // line2
> ci_cmd3="lmnop", // line3
> ci_cmd4="pqrst", // line4
>
> I want to delete line 1 and 2 and the above should look like
> as shown below:
>
> ci_cmd1="lmnop",
> ci_cmd2="pqrst",
Wher
Hi ,
Can some one provide me with a perl script for this:
Problem:
ci_cmd1="abcdef", // line1
ci_cmd2="ghijk", // line2
ci_cmd3="lmnop", // line3
ci_cmd4="pqrst", // line4
I want to delete line 1 and 2 and the above should look like as shown below:
