Puoi utilizzare la variabile $^O.
codice:
$ perl -e 'printf("%s\n", $^O)'
openbsd