use strict; if ($^O =~ /MSWin32/) { my $res = eval "use Win32::Service"; die $@ if $@; # do Windows code } else { # Assume Unix, even though there are other platforms # do Unix code };