Help for this page

Select Code to Download

Select or download this

...
if (/(?:(?<!\\)@(?:([[:word:]:]+)::)?ISA\s*=|(?:use\s+(?:base|parent))
+)\s*(.*)/) 
        {
            $package = $1 if defined($1);
...