# pipe output of find into this
# every directory becomes a cue file
while (<>){
chomp;
$_ or next;
if ( -f $_ ){
/(mp3|flac)$/i or next;
print CUE <<XYZ;
FILE "$_" MP3
TRACK 01 AUDIO
INDEX 01 00:00:00
XYZ
}else{
s=/=_=g;
open CUE, '>', "$_.cue";
print CUE <<ABC;
PERFORMER "$_"
TITLE "$_"
ABC
}}
__END__
--
Elect Racquel Banana! They call her Mellow Yellow!
She's bound to be the very next phase! Racquel Banana in 2020!
_______________________________________________
kc mailing list
[email protected]
https://mail.pm.org/mailman/listinfo/kc
