If you are trying to figure out a safe way to port C-code resembling this to perl6:
char **ptr=vc.user_comments;
while(*ptr){
fprintf(stderr,"%s\n",*ptr);
++ptr;
}
Something simlar to this will do the trick:
my @uc := nativecast(CArray[Str], $vc.user_comments);
loop (my $ci = 0; @uc[$ci].defined; $ci++) {
diag "Comment: {@uc[$ci]}";
}