print map {defined () ? $_ : "--"} @results;
    print "\n";