786     const I32 gimme = GIMME_V;  in PP()  local
801 	    if (gimme != G_ARRAY)  in PP()
818 		if (gimme != G_ARRAY)  in PP()
842 		    if (gimme == G_ARRAY) {  in PP()
877 		if (gimme != G_ARRAY)  in PP()
885     if (gimme == G_ARRAY) { /* array wanted */  in PP()
889     else if (gimme == G_SCALAR) {  in PP()
1001     I32 gimme;  in PP()  local
1010     gimme = GIMME_V;  in PP()
1087 		    if (gimme != G_VOID && hv_exists_ent(hash, sv, 0))  in PP()
1190     if (gimme == G_VOID)  in PP()
1192     else if (gimme == G_SCALAR) {  in PP()
1244     const I32 gimme = GIMME;  in PP()  local
1272 	if (gimme == G_ARRAY)  in PP()
1355     if (gimme == G_ARRAY) {  in PP()
1476     if (gimme == G_ARRAY)  in PP()
1491     const I32 gimme = GIMME_V;  in Perl_do_readline()  local
1499 	call_method("READLINE", gimme);  in Perl_do_readline()
1502 	if (gimme == G_SCALAR) {  in Perl_do_readline()
1550 	if (gimme == G_SCALAR) {  in Perl_do_readline()
1561     if (gimme == G_SCALAR) {  in Perl_do_readline()
1590 #define SNARF_EOF(gimme,rs,io,sv) \  in Perl_do_readline()  argument
1591     (gimme != G_SCALAR || SvCUR(sv)					\  in Perl_do_readline()
1598 		|| SNARF_EOF(gimme, PL_rs, io, sv)  in Perl_do_readline()
1616 	    if (gimme == G_SCALAR) {  in Perl_do_readline()
1664 	if (gimme == G_ARRAY) {  in Perl_do_readline()
1671 	else if (gimme == G_SCALAR && !tmplen && SvLEN(sv) - SvCUR(sv) > 80) {  in Perl_do_readline()
1685     I32 gimme = OP_GIMME(PL_op, -1);  in PP()  local
1687     if (gimme == -1) {  in PP()
1689 	    gimme = cxstack[cxstack_ix].blk_gimme;  in PP()
1691 	    gimme = G_SCALAR;  in PP()
1797     I32 gimme;  in PP()  local
1806     gimme = OP_GIMME(PL_op, -1);  in PP()
1807     if (gimme == -1) {  in PP()
1809 	    gimme = cxstack[cxstack_ix].blk_gimme;  in PP()
1811 	    gimme = G_SCALAR;  in PP()
1815     if (gimme == G_VOID)  in PP()
1817     else if (gimme == G_SCALAR) {  in PP()
1831     else if (gimme == G_ARRAY) {  in PP()
2298 	I32 gimme = GIMME_V;  in PP()  local
2305 	if (gimme == G_SCALAR) {  in PP()
2309 	else if (gimme == G_ARRAY)  in PP()
2333     I32 gimme;  in PP()  local
2341     if (gimme == G_SCALAR) {  in PP()
2366     else if (gimme == G_ARRAY) {  in PP()
2393     I32 gimme;  in PP()  local
2410 	if (gimme == G_SCALAR)  in PP()
2412 	if (gimme == G_ARRAY) {  in PP()
2441 	if (gimme == G_SCALAR) {  in PP()
2475 	else if (gimme == G_ARRAY) {  in PP()
2499 	if (gimme == G_SCALAR) {  in PP()
2525 	else if (gimme == G_ARRAY) {  in PP()
2592     I32 gimme;  in PP()  local
2684     gimme = GIMME_V;  in PP()
2880 	    if (gimme == G_SCALAR && ++markix != PL_stack_sp - PL_stack_base ) {  in PP()