VladPolskiy/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2025-07-21 23:40:34 +00:00
Code Issues Packages Projects Releases Wiki Activity

Version semantics changed in perl 5.10

Browse Source
This commit is contained in:
Jamie Cameron
2008-08-04 23:27:20 +00:00
parent e2536f52b1
commit c1c889af0a
2 changed files with 14 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
cpan/cpan-lib.pl
View File

@ -386,5 +386,18 @@ if (&foreign_exists("mount")) {
return 0;
}
# get_nice_perl_version()
# Returns the Perl version is human-readable format
sub get_nice_perl_version
{
local $ver = $^V;
if ($ver =~ /^v/) {
return $ver;
}
else {
return join(".", map { ord($_) } split(//, $^V));
}
}
1;