You can do something like this to avoid getting too escape happy.
if ( $string =~ m#<ID>(.*)</ID># ) { ... } [download]
In reply to Re: Help for regex by cursion in thread Help for regex by Anonymous Monk