Select Code to Download

  for my $oflag (qw/ NOFOLLOW BINARY LARGEFILE NOINHERIT /) {

  # Special case O_EXLOCK
  $LOCKFLAG = eval {
...
    local $SIG{__WARN__} = sub {};
    &Fcntl::O_EXLOCK();
  };

unless ($^O eq 'MacOS') {
  for my $oflag (qw/ TEMPORARY /) {
...
    };
  }
}

perl -le print $^O