Re^2: map split vs array split

Hi, I am running below and getting scalar value, I thought splitting up array into array would give me list context

~/script/perl/temp@myserver >cat perl.map2
#!/usr/bin/perl -w


use strict;

open (FH, 'foo.txt');
my @lines = <FH>;
close FH;
my @lines1 = split(' ', @lines);
print "@lines1\n";



#hi how are you
#i am fine
~/script/perl/temp@myserver >./perl.map2
2
[download]

Comment on Re^2: map split vs array split Download Code

Replies are listed 'Best First'.
Re^3: map split vs array split by FunkyMonk (Bishop) on Jul 30, 2007 at 23:54 UTC
Yet again, it's all about context: `my @lines1 = split(' ', @lines);` [download] split expects a regexp and a string as arguments, which are both scalars. `@lines` is evaluated in scalar context, returning the number of elements it contains. So, split has nothing to split, and returns the number of elements to be assigned to `@lines1`.	[reply] [d/l] [select]
Re^3: map split vs array split by radiantmatrix (Parson) on Jul 31, 2007 at 15:18 UTC
Simply put, you can't split arrays. The purpose of split is to split a string into a list of values. Therefore, split expects a scalar as its second argument, representing the string to split. When you pass an array, the array is evaluated in scalar context, which returns the number of elements in the array. If you wanted to split each of the lines, you should use a foreach loop to iterate over the values in the array and operate on them one at a time: `foreach (@lines) { my @lines1 = split(' ', $_); # $_ is "it" -- the current element of + @lines print @lines1,"\n"; }` [download] Or, for another approach, you could use map: `map { print split(' ', $_),"\n" } @lines;` [download] In any case, split simply does not, will not work they way you're trying to use it -- it's not supposed to. <–radiant.matrix–> Ramblings and references The Code that can be seen is not the true Code I haven't found a problem yet that can't be solved by a well-placed trebuchet	[reply] [d/l] [select]