http://qs1969.pair.com?node_id=261248

Washie101 has asked for the wisdom of the Perl Monks concerning the following question:

Hi guys,

I have a parsing teaser that i need to get fixed.

Here goes.
heres are two lines of code the first one i need to remove
the comment at the end the second one needs to be ignored.


1. code <xyzfdgfghgf> ;strip me
2. code <<HTML>;nbsp dont strip me</HTML>>


basically i want to search and trim (0+ spaces);(0+chars) AFTER the last >


i need to have it in the format
if($line=~pattern)
{
$line =~new Trimmed comment pattern ;
}


can anyone help?

J