Beefy Boxes and Bandwidth Generously Provided by pair Networks
Problems? Is your data what you think it is?
 
PerlMonks  

Re^3: Search and Replace Elements from 1 array to another.

by Riales (Hermit)
on Apr 03, 2012 at 17:46 UTC ( #963284=note: print w/replies, xml ) Need Help??


in reply to Re^2: Search and Replace Elements from 1 array to another.
in thread Search and Replace Elements from 1 array to another.

Shouldn't be much of a change. The only somewhat tricky part might be a fancier use of split in order to avoid having to concatenate the first few values together after splitting them previously. I think this should work:

# Instead of the existing split in the code I wrote... my ($pre, $possible) = split / ([^ ]+)$/, $stu;

That way, you can just concatenate $pre to the beginning of $matched_dp when you assign to $stu.

As a sidenote, am I the only one that was surprised to find that Perl does not have an rsplit function? This is possibly the first time I've found myself thinking 'Gee, if this were Python...' :P

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://963284]
help
Chatterbox?
and all is quiet...

How do I use this? | Other CB clients
Other Users?
Others making s'mores by the fire in the courtyard of the Monastery: (3)
As of 2016-12-10 05:59 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (160 votes). Check out past polls.