Help for this page
do { ... } for ...;
do { ... for ... } for ...;
while (...) { ...}
do { ...} while ...;
print map ord, split //, `cat file.pl`;