diff --git a/lib/CPAN/DistnameInfo.pm b/lib/CPAN/DistnameInfo.pm
index 1a4d48e..8ba1454 100644
--- a/lib/CPAN/DistnameInfo.pm
+++ b/lib/CPAN/DistnameInfo.pm
@@ -63,7 +63,7 @@ sub distname_info {
     if ($file =~ /^perl-?\d+\.(\d+)(?:\D(\d+))?(-(?:TRIAL|RC)\d+)?$/) {
       $dev = 1 if (($1 > 6 and $1 & 1) or ($2 and $2 >= 50)) or $3;
     }
-    elsif ($version =~ /\d\D\d+_\d/ or $version =~ s/-TRIAL[0-9]*$//) {
+    elsif ($version =~ /\d\D\d+_\d/ or $version =~ /-TRIAL[0-9]*$/) {
       $dev = 1;
     }
   }
diff --git a/t/ext.t b/t/ext.t
index a555c3a..ff6ff9a 100644
--- a/t/ext.t
+++ b/t/ext.t
@@ -581,5 +581,5 @@ Gopher-Server-0.1.1.tar.bz2	Gopher-Server	0.1.1
 HTML-Template-Dumper-0.1.tar.bz2	HTML-Template-Dumper	0.1
 Task-Deprecations5_14-1.00.tar.gz	Task-Deprecations5_14	1.00
 Foo-Bar-1.0௧.tar.gz	Foo-Bar-1.0௧
-Foo-Bar-1.0-TRIAL.tar.gz	Foo-Bar	1.0	1
-Foo-Bar-1.0-TRIAL2.tar.gz	Foo-Bar	1.0	1
+Foo-Bar-1.0-TRIAL.tar.gz	Foo-Bar	1.0-TRIAL	1
+Foo-Bar-1.0-TRIAL2.tar.gz	Foo-Bar	1.0-TRIAL2	1