graham's regex makes more sense than mine
This commit is contained in:
parent
e71ce09588
commit
da4f2f08b3
1 changed files with 1 additions and 1 deletions
|
|
@ -233,7 +233,7 @@ sub load {
|
||||||
}
|
}
|
||||||
|
|
||||||
# Sanitize
|
# Sanitize
|
||||||
if ( $module !~ m{^\w+(?:\w+|::)*\w+$} ) {
|
if ( $module !~ m{^\w+(?:::\w+)*$} ) {
|
||||||
croak "Invalid module name: $module";
|
croak "Invalid module name: $module";
|
||||||
}
|
}
|
||||||
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue