use constant PATTERN => qr/def/;
if ($string =~ PATTERN) { ... }

##</code><code>##

if ($string =~ /this@{[ PATTERN ]}that/) { ... }