Skip to main content
Revision 6cae350ad1e6a484d748c6cec33ab69c6bb6593a authored by Lutz Jänicke on 30 July 2002, 10:39:36 UTC, committed by Lutz Jänicke on 30 July 2002, 10:39:36 UTC
Release 0.9.6e
Submitted by:
Reviewed by:
PR:
1 parent cfebe39
Raw File
deleof.pl
#!/usr/local/bin/perl

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