### list screen ### if ($mode eq "delete") { delete_item(); } elsif ($mode eq "update") { update_item(); } display_item_list();