if ($token =~ /(['\-\w]+)/)