programming-examples/perl/Statement/Mixed diamond operator with for loop condition 2.pl

for (print "%"; <>; print "%") {
    print;
}