if (/\Q$hashnew{$com}\E/) {
# ...