In general, making things easy to read is more important than making them short. In this case though, I'd agree that you're taking the long way around without a good reason. I'd do something like this (untested!):

print ($File::Find::name =~ m/^C:\/users\/User\/Music\/(.*)$/i);
[download]

P.S. Please use strict and warnings!