warn "Test data is in Unix format; may not work on $^O"
  unless File::Spec->isa('File::Spec::Unix');