.. 1039101693 4096 File picture.jpg 1039036371 38633 File test.jpg ... #### ${$ref->{pictures}->{picture}}[1]->{Mtime} #### $xmlref = grep { $_->{Name} eq 'test.jpg' } @{$ref->{pictures}->{picture}};