my @words = split /\s+/, $string;
my @words = $string =~ /(\S+)/g;

##</code><code>##

my @bignums = $string =~ /(\d{4,})/;g

##</code><code>##

my @funny_delimited = split /(?:,\s+|###|!delim!)/, $string;