#----------------------------------------------------------------------------#
#we want to die if a system isn't explicitly supported
BEGIN {
  #these are the os's that are supported at this time
  my @Supported  = (
      'openbsd', 
      'freebsd', 
      'linux', 
      'irix', 
      'solaris', 
      'darwin', 
      'MSWin32'
     );

  grep /$^O/, @Supported 
    or die "$^O isn't supported by Sys:IP yet.\n";
}