Extract duration from MP3-Files

Print file names with duration for musicbrainz.org with this elegant one-liner:

for i in *mp3 ; \
do dur=$(ffprobe "$i" 2>&1 | \
grep Duration | \
perl -ne '/Duration: 00:(.*?)\./; print $1;'); \
echo "${i%%.mp3} $dur"; \
done