#!/usr/local/plan9/bin/rc

if (~ $#* 0) exit usage
fn readtag {
	metaflac '--export-vc-to=-' $1|sed 's/DATE/YEAR/g'|
	awk -F'=' '{
		gsub("'", "''", $2);
		printf("%s ''%s''\n", tolower($1), $2);
	}'|sort

}

for (s in $*){
	echo file ''''^$s^''''
	switch($s){
		case *.flac
			readtag $s
		case *
			echo not a flac file?
	}
}