C:\>perl -e "$arch .= sprintf \"-%vd\", substr($^V, 0, 2) if $] >= 5.008;print $arch"
-5.8

##</code><code>##

C:\>perl -e "$arch .= sprintf \"-%vd\", substr($^V, 0, 2) if $] >= 5.008;print $arch"
-118.53