parsing special characters in perl



Hi,
I am trying to parse a line
....Read product information for the AMD Athlon? 64 3200+, 2.0 GHz
Athlon 64 (AMDADA3200BIBOX) AMD Processor in a Box (PIB) 

using the HTML Toke parser in Perl, the regular expression that i have
is

if($subject =~
m/Read\s*product\s*information\s*for\s*the\s*([\s\w\&\:\;\"\'\-\_\>\<\\\/\)\(,\.\?\!\~\%\*\+\=\@\$]+)/gi)


the line parses everything after 'the' like it parseses "AMD Athlon"
but when it encounters the TM (symbol) it drops everything after that.
When I need everything till the end of line.

Is there a special symbol / wild card character that i can include in
this regular expression so as to keep parsing the text till the end of
line.

Thank You in anticipation

.


Quantcast