my @array = split /,/, $_;
    die "Request Id $id already present in file\n" if $array[0] eq $id;