Changeset 2341
- Timestamp:
- 10/21/07 15:56:47 (1 year ago)
- Files:
Legend:
- Unmodified
- Added
- Removed
- Modified
- Copied
- Moved
Trunk/Scripts/Audio_scripts/UserSubmission/PROMPTS.pm
r2285 r2341 107 107 $linescalar =~ s/,//g; # remove commas 108 108 $linescalar =~ s/\.//g; # remove periods 109 # !!!!!! 110 # dealing with quotes 109 111 # $linescalar =~ s/\'//g; # remove single quotes; but need words like "don't" - need to research this more ... 110 $linescalar =~ s/\'EM//g; # remove leading single quotes 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 113 $linescalar =~ s/\'EM//g; # remove leading single quotes for contraction of them 111 114 $linescalar =~ s/\"//g; # remove double quotes 115 # !!!!!! 112 116 $linescalar =~ s/://g; # remove colon 113 117 # $linescalar =~ s/-//g; # compound word dash