dir /s /b c:\* | perl -nE"/\\([^\\]+)$/ and length($1) > 250 && say"