Select Code to Download

Global symbol "$number" requires explicit package name [...]
Global symbol "@regexp" requires explicit package name [...]
Global symbol "$number" requires explicit package name [...]

$number = shift;
$regexp[$_] = shift foreach (0..$number-1);
...
    }
  }
}