perl -ne 'BEGIN{@f=<*.mp3>}; chop; rename shift @f, sprintf("%02d - %s.mp3", $., $_)' < titles