Help for this page

Select Code to Download

Select or download this

if (/^\s*module\s+(\w+)/) {
    $module = $1;
    print "Found module '$module'\n";
}