my @cover = ( 'image/', '' );

for my $ext (qw' jpg gif ')
{
        if ( exists $files->{$ext} )
        {
                $cover[0] .= $ext;
                $cover[1]  = $files->{$ext}->[0];
                last;
        } # if
} # for

open( my $in, '<', $cover[1] )
        or die "Cannot open file '$cover[1]': $!";
binmode( $in );

my $data = do{ local $/ = undef; <$in> };

close( $in );

for my $file ( @{ $files->{'mp3'} } )
{
        my $mp3   = $self->open_mp3( $file );
        my $id3v2 = $self->get_id3v2( $mp3 );

        $self->set_id3v2( $id3v2, 'APIC', $cover[0], 3, 'Cover Image', $data );
} # for