(See Also: "Extract Cover Art" column and command)
Requirements:
- Directory Opus 11.5.2 or above.
- ActivePerl 5.20.2.2001 or above installed and enabled for scripting.
- The MP3-Tag Perl package.
If you upgrade ActivePerl, make sure the package exists (is compatible with) for the new version.
Unlike JScript and VBScript, Perl scripting is not supported in Windows out of the box. You must install ActivePerl and the required package for this script to work. This post explains in more detail:
Overview:
This script adds a CoverArt YES/NO column, and the commands ExtractTagImage and ExtractTagImages.
The scripts seems to work properly on my computer, but no guarantees are given.
Commands:
ExtractTagImage
ExtractTagImage INFILE=<infullpath> OUTFILE=<outfullpath> AUTOEXT
- Extracts the first available coverart from
<infullpath>and saves it into the file<outfullpath>. - Output filename must be specified with an extension.
AUTOEXT is optional. If it is specified, the script attempts to correct the file extension for the output filename. In other words, if you name the output file test.jpg, but the mime-type says it is a .png then the script writes to the file test.png.
ExtractTagImages
ExtractTagImages OUTPATH=<outputpath> AUTOEXT
- Extracts the first available coverart in each file from selected files.
OUTPATH is optional. If not specified the it outputs the files into the same folder as the files.
AUTOEXT is optional. If it is is specified, the script attempts to correct the file extension for the output file. Default is .jpg.
Note: The script don't seem to handle "special" characters such as japanese.
Download:
- ExtractTagImagesCol.pl.txt (6.5 KB)
- Download the file, then drag it to the list under Preferences / Toolbars / Scripts.
- Remember that, unlike most scripts, this requires ActivePerl to be installed. See above for details.
History:
- Updated recommended version
- Added note about upgrading ActivePerl because MP3-Tag 1.13 is currently not compatible with 5.22.0.2220.