PerlClip - 字符串数据生成工具

背景

在测试过程中，大家经常会碰到一个费时又枯燥的工作，即“测试输入项可接受的最大长度是否符合需求。”尤其是当一个新系统刚开发的时候，有大量的字段需要测试。或者需要使用各种压力输入来测试文本字段或文档。但是，准备文本数据可能会很痛苦。而PerlClip是可以帮助我们完成此任务的工具。

操作

1、运行perlclip.exe（执行此操作时将显示DOS控制台窗口）。
2、输入您要产生的文字图案，回车后，界面上会显示*** Ready to Paste!
3、这时就表示，数据生成成功，并且在windows剪贴板中，你可以随意复制到任何位置。

下载地址

https://www.satisfice.com/download/perlclip
无需安装，直接解压文件夹就可以使用。

常规命令

1、"james" x 5

含义：产生5次james
输出：jamesjamesjamesjamesjames

2、james x (2 ** 3)

含义：产生2的3次方（8次）james
输出：jamesjamesjamesjamesjamesjamesjamesjames

3、chr(13) x 10

含义：产生10个@。同理，根据ASCII对照表，其他的字符也能这样生成。
输出：@@@@@@@@@@

特殊命令

1、$ allchars

含义：产生一个包含从1到255（不包括0）的所有字符代码的字符串。
输出：（输出的内容有点像乱码，所以没有粘贴出来）

2、counterstring 15

含义：输出15个字符长度的字符串。每个号前面的数字，都代表了这个号是第几个字符。这样有助于我们去分辨，实际粘贴了多少个字符。
输出：*3*5*7*9*12*15*

3、counterstring 15 A

含义：在2中，没有指定分隔符，默认为*。这里还可以指定分隔符。
输出：A3A5A7A9A12A15A

4、join "\r\n", (1..10)

含义：换行连续输出1到10。在windos下，'\r'代表：回到当前行的行首，而不会换到下一行；'\n'代表：换到当前位置的下一行，而不会回到行首。
输出：

1
2
3
4
5
6
7
8
9
10

5、textfile C:\Users\80223\Downloads\perlclip\license.txt

含义：将文件中的内容复制到粘贴板中
输出：粘贴出所有文件中的内容，在txt下是没问题的，其他文件类型没尝试过

6、u或d命令是counterstring {num}下延伸的。

含义：意为取二分的上限或者下限。如连续使用两次这个命令counterstring 7、counterstring 10；这时如果输入u，则产生counterstring 9的结果；输入d则产生counterstring 8的结果。
输出：

Pattern:
counterstring 10
*** Ready to Paste!

Pattern:
counterstring 7
*** Ready to Paste!

Pattern:
u
Creating counterstring of length 9.
*** Ready to Paste!

Pattern:
counterstring 10
*** Ready to Paste!

Pattern:
counterstring 7
*** Ready to Paste!

Pattern:
d
Creating counterstring of length 8.
*** Ready to Paste!

其他

帮助命令：help