diff --git a/modules/QDB.pm b/modules/QDB.pm
index 4d38c0c..200e913 100644
--- a/modules/QDB.pm
+++ b/modules/QDB.pm
@@ -129,7 +129,7 @@ sub cmd_qdb
             # Iterate through all quotes.
             foreach my $qkt (keys %$quotes) {
                 # Check if we have a match.
-                if ($quotes->{$qkt}->{quote} =~ m/($expr)/ixsm) {
+                if ($quotes->{$qkt}->{quote} =~ m{$expr}ixsm) {
                     # Match. Add to buffer.
                     push @BUFFER, "\2ID:\2 $qkt - ".$quotes->{$qkt}->{quote};
                 }