sub NEXTLINE { $_[0]->() } print NEXTLINE($combined), "\n" for 0..4;