deleof.pl

一个用于点对点传输加密的工具包源码

#!/usr/local/bin/perl

while (<>)
	{
	print
	last if (/^# DO NOT DELETE THIS LINE/);
	}