Help for this page

Select Code to Download

Select or download this

$ random_file.pl /path/to/mp3s -t mp3 -e 'xmms -e' # random song
$ random_file.pl /path/to/mp3s -t m3u -e 'xmms -e' # random playlist
$ random_file.pl /path/to/mp3s -d -e 'xmms -e'     # random directory

Select or download this

#!/usr/local/bin/perl -w
#
...
File::Find(3), Cache::Cache(3), perl(1)

=cut