If you're splitting on ':',

while (<>) {
    print if tr/:// >= 3; # Special use of tr to count column separato
+rs
}
[download]

To count columns more literally, and splitting on the more traditional whitespace:

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