use Sys::Info;
print Sys::Info->os->name( edition => 1, long => 1 );