Select Code to Download

for(@input){
    if($_[1] gt $_[2]){
...
}

print "$_\n" for @output;

use strict;
use warnings;
...
red 15 2 smith
blue 4 10 walter