for my $i ( keys %{ $config->{item} } ) 
{
    print $config->{item}->{$i}->{destination_dir};
}

##</code><code>##

for (my $i=0; $i < 4; $i++ ) 
{
    print $config->{item}->{$i}->{destination_dir};
}