Firstname Lastname 650 156 7190:somfield:somefield:somefield Firstname Lastname 408 256 7290:somfield:somefield:somefield Firstname Lastname 510 3456 7390:somfield:somefield:somefield
I have the above lines in a file and I am trying to create an array of = phone numbers open (FILE,"thefile") or die; @array =3D <FILE>; my @phone; for each $string (@array) { $phone[$i] =3D ($string =3D~ /\s\d+\s\d+\s\d+:/) ; $i++; } This does not work, what am I doing wrong? or it there a better way? Thanks raj [EMAIL PROTECTED] 650.730.8271 <www.netliant.com> -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]