{
  local $^W;
  print while (<Foo::Data>);
}