Select Code to Download

PP(pp_grepwhile)
    ...
...
    RETURN;
    }
...

c:\test>perl -MO=Concise -wle"print scalar( 1, 2, 3 );"
Useless use of a constant in void context at -e line 1.
...
-              <0> ex-const v ->5
5              <$> const[IV 3] s ->6
-e syntax OK

c:\test>perl -wle"print for ( 'a','b','c' )"
a
b
c

c:\test>perl -wle"print for scalar(( 'a','b','c' ))"
Useless use of a constant in void context at -e line 1.
Useless use of a constant in void context at -e line 1.
c

c:\test>perl -wle"print for scalar 'a','b','c'"
a
...
Useless use of a constant in void context at -e line 1.
Useless use of a constant in void context at -e line 1.
1

PP(pp_aslice)
{
...
    }
    RETURN;
}