I wasn't happy with the fragile redundancy present in the OP and my earlier solution, so what follows are solutions without that problem:

perl -MFile::Find -le"chdir($ARGV[0]); find { wanted=>sub{ -d || print
+ /..(.*)/ }, no_chdir=>1 }, '.'" C:\users\User\Music >filelist.txt
[download]

perl -MFile::Find::Rule -le"chdir($ARGV[0]); print for File::Find::Rul
+e->file->in('.')" C:\users\User\Music >filelist.txt
[download]

The key is to use chdir to select the perspective you want (and preserve that perspective using no_chdir=>1 with File::Find)

In both cases, I filtered out directories.

Ref: File::Find, File::Find::Rule