-Original Message-
>From: "Sayed, Irfan (Irfan)" <[EMAIL PROTECTED]>
>Sent: Feb 13, 2007 7:12 PM
>To: beginners@perl.org
>Subject: FW: Array manipulation
>
>
>Hi All,
>
>I have one array having values as follows
>
>User [EMAIL PROTECTED]
>User [EMAIL PROTECTED]
>User [EMAIL PROTECTED]
>
>
>
>@a = (1,2,3,4,2,3,5);
>
>print "---> @a\n";
>my %b = undef;
>foreach (@a){
>
>print "--- $_";
> $b{$_} =undef;
>}
>
>@a = keys(%b);
>
>print "\n### @a";
>
Hmm,that will break the order of the original array.
--
Jeff Pang
EMAIL: [EMAIL PROTECTED] AIM: jeffpang
--
To unsubscribe, e-mai
I got the output like ..
P:\>"C:\Documents and Settings\rkilaru\Desktop\prog.pl"
---> 1 2 3 4 2 3 5
--- 1--- 2--- 3--- 4--- 2--- 3--- 5
### 4 1 3 2 5
P:\>
Rajeev
On 2/13/07, kilaru rajeev <[EMAIL PROTECTED]> wrote:
Hi Irfan,
Please find the following way.
@a = (1,2,3,4,2,3,5);
prin
Hi Irfan,
Please find the following way.
@a = (1,2,3,4,2,3,5);
print "---> @a\n";
my %b = undef;
foreach (@a){
print "--- $_";
$b{$_} =undef;
}
@a = keys(%b);
print "\n### @a";
rgds,
Rajeev Kilaru
On 2/13/07, Sayed, Irfan (Irfan) <[EMAIL PROTECTED]> wrote:
Hi All,
I have
