Changeset 2342
- Timestamp:
- 11/05/07 23:53:51 (1 year ago)
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
Trunk/Scripts/Audio_scripts/UserSubmission/PROMPTS.pm
r2341 r2342 110 110 # dealing with quotes 111 111 # $linescalar =~ s/\'//g; # remove single quotes; but need words like "don't" - need to research this more ... 112 $linescalar =~ s/\'(\b.*\b)\'/$1/g; # remove single quotes from quoted text; single quote must be at start of a word, and at end of a wrod 112 # $linescalar =~ s/\'\b(.*)\b\'/$1/g; # remove single quotes from quoted text; single quote must be at start of a word, and at end of a word - does not work if there are two words with single quotesin them in same sentence ... 113 113 114 $linescalar =~ s/\'EM//g; # remove leading single quotes for contraction of them 114 115 $linescalar =~ s/\"//g; # remove double quotes