Help for this page
$_="|" x 5; @foo = split /\|/,$_; print scalar @foo; # prints 0
@foo = split /\|/,$_,-1