my $match = "(?<=module )$ARGV[2].*?([\\(;])";

##</code><code>##

my $match = qr/(?<=module )$ARGV[2].*?([\\(;])/;