in reply to To find OS in perl using API

use POSIX;
my ($sysname, $nodename, $release,$version, $machine)= POSIX::uname();

[download]

In Section Seekers of Perl Wisdom