What about this?

@city1 = ('homer','bart','lisa','maggie','me', ... lots of values);

@city=();              # this clears @city
for($i=0;$i<3;$i++){
push (@city,$city1[$i]);
}

---------

@city will equal ('homer', 'bart', 'lisa')

---
You are currently subscribed to perl-win32-users as: [archive@jab.org]
To unsubscribe, forward this message to
         [EMAIL PROTECTED]
For non-automated Mailing List support, send email to  
         [EMAIL PROTECTED]

Reply via email to