my $string =  join " -x exclude=$_" ,q(),@excludes;

##</code><code>##

print <<`EOF`;
ls
cd /
ls
EOF