Um... how about: my ($first,$last,$email,$wName) = (split /\s|\s/, $wikiname)[1..4];
On 5/11/07, Chas Owens <[EMAIL PROTECTED]> wrote:
On 5/11/07, Tony Heal <[EMAIL PROTECTED]> wrote: > I have a list of names that I need to break up and reassemble. > > The list consists of the first name and last name combined as a single word in wiki format. i.e.JoeBlow > > I need to break this up and recreate the list as > > | FirstName | LastName | Email | WikiName | > > i.e. > > | Joe | Blow | [EMAIL PROTECTED] | JoeBlow | > > I can do all of this except break the original word apart. > > Tony Assuming that JoeMcCarthey should be Joe McCarthy, I would do this my ($first, $Last) = $wikiname =~ /([A-Z]\w*?)([A-Z]\w*)/; -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/
