Re: How to call a function on each item after a split?

Although using an array is usually a better solution, it can be done as follows:

my ($item1, $item2, $item3, $item4, $item5) = map {clean($_)} split(/\
+|/, $str);
[download]

CountZero

A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James

My blog: Imperial Deltronics

Comment on Re: How to call a function on each item after a split? Download Code

Replies are listed 'Best First'.
Re^2: How to call a function on each item after a split? by Lotus1 (Vicar) on Oct 08, 2012 at 18:54 UTC
Actually your code assigns the return values from `clean()` which are either 1 or the empty string. The function uses the side effect of changing $_ but could be modified to return the trimmed string instead.	[reply] [d/l]
Re^3: How to call a function on each item after a split? by CountZero (Bishop) on Oct 09, 2012 at 06:36 UTC
Oops, my bad. I am so used to writing subs that return a meaningful result rather than do an in-place action-at-a-distance. MrSnrub has the right solution: just return `$_` in the `map`. CountZero A program should be light and agile, its subroutines connected like a string of pearls. The spirit and intent of the program should be retained throughout. There should be neither too little or too much, neither needless loops nor useless variables, neither lack of structure nor overwhelming rigidity." - The Tao of Programming, 4.1 - Geoffrey James My blog: Imperial Deltronics	[reply] [d/l] [select]


The stupid question is the question not asked
	PerlMonks