sub serial_finder {
    my @list;