BEGIN {
  $^O eq 'Win32'
    ? eval q[ sub f { ... } ]  # Win32 implementation
    : eval q[ sub f { ... } ]  # Linux implementation
};