#!/usr/bin/perl

while(<DATA>){
s/(?<!<)p\sclass=/<p class=/;

print $_;
}

__DATA__

<p class="Hi">Hello
<p class="new">How r u
[download]

The above output should look like

<p class="Hi"\>Hello

<p class="new"\>How r u
[download]