Or, as of Perl v5.22, the experimental "refaliasing" feature can be used, allowing one to access %info as if it were a regular hash, without having to make a copy of it:

use experimental 'refaliasing';
\my %info = get_mp3info($file);
for my $key (keys %info) {
    print "$key / $info{$key}\n";
}
[download]