in reply to Using arguements and defaults

Just a couple of notes:
/.*_+.*\.[Oo][Gg]{2}$/
should probably be
/_+.*\.ogg$/i
And your use of split and join to replace the _ would be better done with
tr/_/ /s;