Skip to content

Commit 3edb3a1

Browse files
committed
tell perl_version
1 parent 1f2dac8 commit 3edb3a1

File tree

1 file changed

+7
-3
lines changed

1 file changed

+7
-3
lines changed

+stdlib/platform_tell.m

Lines changed: 7 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -24,9 +24,13 @@
2424
raw.dotnet_version = stdlib.dotnet_version();
2525
end
2626

27-
pv = stdlib.python_version();
28-
if ~isempty(pv)
29-
raw.python_version = sprintf('%d.%d.%d', pv(1), pv(2), pv(3));
27+
if stdlib.has_perl()
28+
raw.perl_version = sprintf('%d.%d.%d', stdlib.perl_version());
29+
raw.perl_exe = stdlib.perl_exe();
30+
end
31+
32+
if stdlib.has_python()
33+
raw.python_version = sprintf('%d.%d.%d', stdlib.python_version());
3034
raw.python_home = stdlib.python_home();
3135
end
3236

0 commit comments

Comments
 (0)