my $result = system("rmdir /S /Q $foldername");

##</code><code>##

my $result = system('rmdir', '/S', '/Q', $foldername);