unless (/cr\d$/) {
	print "This entry didn't match!\n";
}

##</code><code>##

if ($_ !~ /cr\d$/) {
	print "Didn't match.\n";
}