sub Wanted {
   my $orig_dir = cwd;
   if (-d $_) {
      chdir $_;
      # more code ...

      foreach my $file (@music_files) {
         chdir $_;
         $file =~ s/ /%20/g;
         #more code here
      }
   }
}

##</code><code>##

sub Wanted
{
   my $orig_dir = cwd;
   if (-d $_)
   {
      chdir $_;
      # more code ...

      foreach my $file (@music_files)
      {
         chdir $_;
         $file =~ s/ /%20/g;
         #more code here
      }
   }
}