wenn du markieren willst brauchst du $text =~ s/(\s\w+)/##$1##/g oder so ähnlich, ich hoffe du verstehst das prinzip.