my @delete_list = 
  grep s/^delete_check_//,
  keys %session;