for(@input){
    if($_[1] gt $_[2]){
    push (@output, "$_[0] $_[2] $_[1] $[3] +");
}

print "$_\n" for @output;