##
#perl2exe_bundle "C:\cygwin\bin\find.exe"
#perl2exe_bundle "C:\cygwin\bin\cygwin1.dll"
#perl2exe_bundle "C:\cygwin\bin\cygintl-1.dll"
my $this_dir = $ENV{TEMP} || $ENV{TMP} || ($^O eq "MSWin32" ? $ENV{WINDIR} : '/tmp');
####
open( FIND, "$this_dir\\find . -type d -print0 |" )
or die "can't run find: $!";