for (@output5b) { s/\b0\b/1/ }; #### for (@output5b) { s/^0$/1/ } #### for (@output5b) { $_ = 1 if $_ == 0 }