Select Code to Download

my $count = 0;
for ($count = 0;$count < 100; $count++) {
   mkdir "folder_" . $count;
   chdir "folder_" . $count;
}

sub recursive_remove {
    my($dir) = @_;
...
    }
}
recursive_remove('C:/temp/' . $ARGV[0]);