in reply to splitting punctuation in a text
Greetings,
I would suggest using a word boundary \b. for instance...
Update! Upon re-reading your post I am a bit unclear... Do you want to keep the punctuations or not?
if not
-InjunJoel
I would suggest using a word boundary \b. for instance...
Which produces what you want... well close. If you don't want the spaces around your punctuation marks this#!/usr/bin/perl -w use strict; use Data::Dumper; my $line = "earth, wind & fire"; my @chunks = split /\b/, $line; print Dumper(\@chunks);
should do the trick.#need the grep to filter for truth! #basically checking if #the element is defined/filled-in/not-blank my @chunks = grep{$_} split /\b|\s/, $line;
Update! Upon re-reading your post I am a bit unclear... Do you want to keep the punctuations or not?
if not
will work.#either this my @no_punct = $line =~ /(\w+)/g; #or this my @no_punct = grep{$_}split /\W|\s/, $line;
-InjunJoel
"I do not feel obliged to believe that the same God who endowed us with sense, reason and intellect has intended us to forego their use." -Galileo
In Section
Seekers of Perl Wisdom