diff options
| -rw-r--r-- | t/run/switches.t | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/t/run/switches.t b/t/run/switches.t index e62eda4d63..0d91d8a810 100644 --- a/t/run/switches.t +++ b/t/run/switches.t @@ -263,7 +263,7 @@ SWTESTPM my $v = sprintf "%vd", $^V; like( runperl( switches => ['-v'] ), - qr/This is perl, v$v (?:DEVEL\d+ )?built for \Q$Config{archname}\E.+Copyright.+Larry Wall.+Artistic License.+GNU General Public License/s, + qr/This is perl, v$v (?:DEVEL:[-A-Za-z0-9]+ )?built for \Q$Config{archname}\E.+Copyright.+Larry Wall.+Artistic License.+GNU General Public License/s, '-v looks okay' ); } |