Further to Fletchs most pertinent observations, you may want to swap the " & ^ chars i.e. leading to regex: /^"CNR\d"/ - but that wouldn't make sense for numbers > 9, so I suspect the regex ought to be /^"CNR\d+"/ assuming the 'issue' appears (when reported) to be of the form CNR99....

Moreover, I'll bet that perl doesn't like exit1; - I think you meant exit 1;.

Also, I've just noticed that both $committer & $commitlog only define strings - neither causes a command to run in the shell - you need backticks or qx to do that hence $committer should be set using

$committer = `$svnlook author $txn_name $repo_path` or die "Unable to 
+get committer with svnlook.\n";
[download]

Similarly with setting of $commitlog...