while (<>) {
    my @cols = split;
    print if @cols >= 4;
}