do not use deprecated variables

mojolicious · Jan 19, 2012 · 09d7528 · 09d7528
1 parent da26631
commit 09d7528
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/lib/Mojolicious/Command/version.pm b/lib/Mojolicious/Command/version.pm
@@ -48,7 +48,7 @@ sub run {
 
   print <<"EOF";
 CORE
-  Perl        ($], $^O)
+  Perl        ($^V, $^O)
   Mojolicious ($Mojolicious::VERSION, $Mojolicious::CODENAME)
 
 OPTIONAL

diff --git a/lib/Mojolicious/templates/exception.development.html.ep b/lib/Mojolicious/templates/exception.development.html.ep
@@ -206,7 +206,7 @@
       <div class="box infobox" id="more">
         <div id="infos">
           <table>
-            %= $kv->(Perl => "$] ($^O)")
+            %= $kv->(Perl => "$^V ($^O)")
             % my $version  = $Mojolicious::VERSION;
             % my $codename = $Mojolicious::CODENAME;
             %= $kv->(Mojolicious => "$version ($codename)")