use strict;

use constant NAME => 'abc';

if ($ARGV[0] =~ /${\NAME}/) { print "match"; };