chdir($dir) or die "Can't chdir to $dir: $!";

##</code><code>##

copy($_,$music) or die "Can't copy $_ to $music: $!";