chdir "d:/music/new"; #### chdir "d:\\music\\new"; #### my $music_dir = shift || "d:/music/new"; chdir $music_dir;