Perl RegEx'ing a series of variables

ifeatu · 12-11-2009, 09:18 PM

I want to run some regex on an array to remove randomly placed underscores.

here is an example of some array elements:

Code:

Array element 0 is: Jan
Array element 1 is: 08
Array element 2 is: 1991
Array element 3 is: The_beginning
Array element 4 is: Berkeley
Array element 5 is: _Side
Array element 6 is: 1
Array element 7 is: .mp3

I know I would probably run a loop and then do some regex like
s/*_*// to it

Please advise!

Thanks

estabroo · 12-11-2009, 10:19 PM

Since you are just looking to get rid of _ you might want to use tr// instead.

map(tr/_//d, @array);

this map is the same as doing

foreach (@array) {
tr/_//d;
}

Telemachos · 12-12-2009, 06:24 AM

Quote:

Originally Posted by estabroo

Since you are just looking to get rid of _ you might want to use tr// instead.

map(tr/_//d, @array);

this map is the same as doing

foreach (@array) {
tr/_//d;
}

Note that $array[3] will become 'Thebeginning'.

I think that tr is the way to go, and you're giving the OP what he asked for (underscores replaced by empty string), but the OP might want to rethink what he wants because of cases like $array[3].

ghostdog74 · 12-12-2009, 06:49 AM

Quote:

Originally Posted by ifeatu

I know I would probably run a loop and then do some regex like
s/*_*// to it

then what is stopping you?? please also read up the Perl docs. type perldoc perl on your command line, or go straight to the web site.