Help for this page
my $match = "(?<=module )$ARGV[2].*?([\\(;])";
my $match = qr/(?<=module )$ARGV[2].*?([\\(;])/;