Re: Surprised by split

I think split behaves differently if the first parameter is a normal string instead of a regex. The perlfunc documentation doesn't mention this and I can't remember how exactly it differs. Anyway since | is a regex special character (alternation) you need to escape it. I'd normally write this as:

split /\|/, $str

The reason you need two \s is because of the behaviour of double quotes - just try:

print "|";
print "\|";
print "\\|";
[download]

and you should see what's happening.

s^^unp(;75N=&9I<V@`ack(u,^;s|$.+\`|"$`$'\"$&\"$"|ee;/m.+h/&&print$&

Comment on Re: Surprised by split Select or Download Code

Replies are listed 'Best First'.
Re^2: Surprised by split by extremely (Priest) on Aug 11, 2005 at 14:09 UTC
Some "perlfunc" mention it: As a special case, specifying a PATTERN of space (' ') will split on white space just as split with no arguments does. Thus, split(' ') can be used to emulate awk's default behavior, whereas split(/ /) will give you as many null initial fields as there are leading spaces. A split on /\s+/ is like a split(' ') except that any leading whitespace produces a null first field. A split with no arguments really does a split(' ', $_) internally. -- $you = new YOU; honk() if $you->love(perl)	[reply]

Replies are listed 'Best First'.

Re^2: Surprised by split
by extremely (Priest) on Aug 11, 2005 at 14:09 UTC

As a special case, specifying a PATTERN of space (' ') will split on white space just as split with no arguments does. Thus, split(' ') can be used to emulate awk's default behavior, whereas split(/ /) will give you as many null initial fields as there are leading spaces. A split on /\s+/ is like a split(' ') except that any leading whitespace produces a null first field. A split with no arguments really does a split(' ', $_) internally.

--
$you = new YOU;
honk() if $you->love(perl)

[reply]