my $outlook = get_outlook(); my $mapi = $outlook->GetNamespace('MAPI'); my $default_folder = $mapi->GetDefaultFolder(olFolderContacts); my @all_folder_names; my @all_folders; my %hash = (); my %args = get_args(); print_items($default_folder_)