Perl - プログラミングとか輪読とかの

Perl index

while (<STDIN>){
    print;
}

test