Select Code to Download

$PipeCounter = y/|/|/;

#!/usr/bin/env perl

...
y|u|i|o|p
A|S|D|F|G|H
Z|X|C|V|B|N|

Line 1 has 0
Line 2 has 5
...
Line 6 has 4
Line 7 has 5
Line 8 has 6