Parse out alphabetic characters
From: May (hmtan_at_hotmail.com)
Date: 05/28/04
- Previous message: Silky Manwani: "Re: Question on Net::FTP."
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Date: 27 May 2004 20:29:47 -0700
Hi,
I would like to parse out the same name between
the new and old array , lists of new cells in new array and old cells
in old array. But the scripts are not working right.
Is this because the name of the array are in alphabetic ?
Anyone could help me or advise please ?
Thanks in advance.
open(FILE4, ">same1.txt");
open (FILE5, ">new1.txt");
@new=(and2, nor2,mux3,mux4,nand6);
@old=(and2,mux7,fill_7,mux4);
$count1=4;
$count2=3;
$a=0;
$b=0;
while($a <=$count1)
{
{
if($new[$a] == $old[$b])
{
print FILE4 "$new[$a]\n";
}
elsif($new[$a] !~ $old[$b])
{
print FILE5 "$new[$a]\n";
}
$a++;
}$b++;
}
close(FILE4);
close(FILE5);
- Previous message: Silky Manwani: "Re: Question on Net::FTP."
- Messages sorted by: [ date ] [ thread ] [ subject ] [ author ]
Relevant Pages
|
