Hewlett Pickens wrote:
>
> I am unable to use "split" with pattern matching to remove alpha characters
> from a string and will appreciate a pointer on what I'm doing wrong. (Have
> looked in "Learning Perl" and "Programming Perl" but can't spot my error.)
>
> The detail:
>
> "$stat" is a string that has alpha and numeric data in it.
> I want to remove all of the alpha and put the numeric data into an array.
>
> The first attempt:
>
> my @nums = split(/a-zA-Z/,$stat); # removes all data from the string
>
> The second attempt:
>
> my @nums = split(/a-z/,$stat); # removes all data from the string
>
> From reading, my understanding of "split": Discards all data that matches
> the pattern and returns a set of list values for the unmatched data. ("my
> understanding" may be the problem)
>
> This pattern works - removes all blanks (white space) but leaves alpha and
> numbers which of course isn't what I want
>
> my @nums = split(/ +/,$stat); # removes all blanks
my @nums = $stat =~ /\d+/g;
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]