"" =~ /()/;
for (@list) {
  sleep(5) if !/^$1/;
  print;
  /^(.+)\:/;
}