sub filter
{
return (grep !/winnt/i, @_);
}