Select Code to Download

while ($string =~ /((\w|')+)/g) {

while ($string =~ /(([\w'-])+)/g) {...do something...}

while ($string =~ /((\S)+)/g) {...do something...}