$_ = "Hello there,neighbour";

@words = ( /(\w+)/g );

print "Words are: @words\n";

##</code><code>##

$_ = "We're done. Mr. O'Conner sent e-mail - said 'no thanks'.";

##</code><code>##

@words = ( /(\w+(?:[-']\w+)?)/g;