perl - perlでダンパーの「Var1」値を取得する方法

Question

以下のコードを使用すると、出力が得られますが、「幅」、「file_media_type」、「file_ext」の値が必要ですが、この値を個別に取得できません。私はPerlにとても慣れていないので、助けてください!

コード

use warnings ;
use strict;
use Image::Info qw[image_info];
use Data::Dumper;

my $file = 'd:\perl\test\a.jpg';
my $info = Dumper(image_info($file));
print $info;

出力

$VAR1 = {
          'width' => 45,
          'file_media_type' => 'image/png',
          'file_ext' => 'png',
          'PNG_Chunks' => [
                            'IHDR',
                            'gAMA',
                            'cHRM',
                            'IDAT',
                            'IEND'
                          ],
          'Chunk-cHRM' => '  z%  Çâ  ·   ÇF  u0  O`  :ù  ?o',
          'PNG_Filter' => 'Adaptive',
          'color_type' => 'RGB',
          'height' => 20,
          'Gamma' => '0.45454',
          'resolution' => '1/1',
          'SampleFormat' => 'U8',
          'Compression' => 'Deflate'
        };