where can i find a decent man page for understanding string pattern matching
>> push @phone, /\s(\d+\s\d+\s\d+):/;
----- Original Message -----
From: "John W. Krahn" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, March 25, 2002 2:53 PM
Subject: Re: newbie question
> Anidil Rajendran-Raj wrote:
> >
> > 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;
>
> You should include the file name and the $! variable in the error
> message.
>
> > @array =3D <FILE>;
> ^^^
> This is not a valid operator
>
> > my @phone;
> > for each $string (@array) {
> ^^^^
> each() works with hashes, not scalars, you want to use my() here
>
> > $phone[$i] =3D ($string =3D~ /\s\d+\s\d+\s\d+:/) ;
> ^^^ ^^^
> Again, this is not a valid operator.
>
> > $i++;
> > }
> >
> > This does not work, what am I doing wrong? or it there a better way?
>
>
> open FILE, 'thefile' or die "Cannot open 'thefile': $!";
> my @phone;
> while ( <FILE> ) {
> push @phone, /\s(\d+\s\d+\s\d+):/;
> }
>
>
>
> John
> --
> use Perl;
> program
> fulfillment
>
> --
> To unsubscribe, e-mail: [EMAIL PROTECTED]
> For additional commands, e-mail: [EMAIL PROTECTED]
>
>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
