use File::Find::Rule;

my $dir = shift;

die "$0: invalid directory $dir\n"
  unless -d $dir;

my @files = find(
  name => '*.mp3',
  in   => $dir
);