Re: Split Help

works for me.

[sandy]perl -e '$x="hello"; $y="thishelloyouhellotoday"; @a=split /$x/
+,$y; print "@a\n";'
this you today
[sandy]

[download]

could you give us an example of what doesn't work?

Comment on Re: Split Help Download Code
Re^2: Split Help by de2425 (Sexton) on Mar 16, 2009 at 20:50 UTC
Thanks for the super quick response! What I'm trying to do is to use the split to count the occurrences of the filename with the file. I just checked with a print statement and I am getting a split but for some reason, I cannot get the correct number of splits. I can visually count them but I can't seem to get any goot results from something like: `print "$#lines\n";` [download]	[reply] [d/l]
Re^3: Split Help by jwkrahn (Prior) on Mar 16, 2009 at 21:38 UTC
`$#lines` contains the last index of the array `@lines` which may or may not be one less than the actual number of elements in the array `@lines`. To get the actual number of elements of an array you must use the array in scalar context: `print scalar @lines, "\n";` [download]	[reply] [d/l] [select]
Re^3: Split Help by shmem (Canon) on Mar 16, 2009 at 22:03 UTC
Hmm.. here you are saying `print "$#lines\n";` [download] but in the OP `@line=split(/$variable/,$_);` [download] Maybe you mean `@lines`? or perhaps `$#line`? If you include `use warnings;` [download] at the top of your program, perl helps you emitting a warning if, by typo, you are using a variable only once.	[reply] [d/l] [select]