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
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.txt);
my $cmdline;
open(IN,"<$infile") or die "Whoops! Look what happened. $! \n";
open(OUT,">$outfile") or die "Could not o
> 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