Help for this page

Select Code to Download

Select or download this
```
my $count=map $_, split;
```
Select or download this
```
my $count=+(split);  # ?!?
```

Select or download this

$ perl -lpe '$_=+(split)'
foo
1
bar baz
2