chomp(my $ok = <>),