qwurx [shmem] ~ > perl -le '$_ = "foo bar baz"; $c = /\w+/g; print $c' 1 qwurx [shmem] ~ > perl -le '$_ = "foo bar baz"; $c = () = /\w+/g; print $c' 3 #### qwurx [shmem] ~ > perl -le '$_ = "foo bar baz"; $c = (/\w+/g); print $c' 1