Select Code to Download

foreach my $folder (@folders) {
    next if $folder =~ /^\.\.?/;
...
            remove qw(*.cue *.m3u *nfo *.sfv);
            &renameFolder($folder);

use warnings;
use strict;
...

}