这是一个小的波尔用于翻转文本的脚本颠倒地.这是通过颠倒每行的顺序来实现的，然后用类似的字符替换每个字符替换字符在倒置时最常见（例如，我一直认为倒置时“h”看起来像“4”）
这件事的结果在很大程度上取决于终端字体.太糟糕了ASCII码有几个这样看起来不错的字符。
在编写本程序时，它有一些缺点：
- 它不转换方括号（或其他许多ASCII字符），并且它对高位字符(ISO 8859-1标准).
- While期间文本倒过来并不意味着线做同样的动作。（除非我们将东西放入堆栈，反转，然后逐行处理-记忆大文件消耗，除非我们使用临时文件s）不过，这很容易实施。
- 是的，那个大写字母是最糟糕的！告诉d00dz省去大写字母，否则它们会在大的当革命来了，因为如果他们不能用颠倒的字母“s”说话，他们是第一个靠墙的人=）
代码的灵感来自我的朋友在alt.lifestyle.毛茸茸的. =)
#!/usr/bin/perl-w#把东西倒过来打印。#（c）Weyfour WWlf 2000-05-18#灵感来自WolfZone的类似程序=）使用严格；同时（<>）{咀嚼；#标点符号# !“”（）“，。tr/！""()'',./i``）（，，'`'/；#数字（可能是最简单的部分）# 0123456789tr/0123456789/0l5Eh29L86/；#字符#abcdefghijklmnopqrstuvwxyz EFGHIJKLMNOPQRSTUVWXYZ ABCDefghiklmnop qrstuwxyztr/a-zA-Z型/eqopaJ@y!f> jwoudbJs+n^mxhzV8D43J9HIf>IWNOJOJSLAAMXhZ/；打印“”，（反向拆分//），“\n”；}
转动你的班长 颠倒地来阅读这个=`s！y+peaJ o+umop ap！sdn Jo+！uow Jnoh uJnL公司
（后者实际上是永久移动式：你把显示器倒过来看，就在它旁边，你有倒过来的命令，要把显示器倒回去。请参见如何让傻瓜保持悬念.)