summaryrefslogtreecommitdiff
path: root/util/deleof.pl
blob: 155acd88ff1374cd61f9d6a82aa976e2f58d0c5e (plain)
1
2
3
4
5
6
7
#!/usr/local/bin/perl

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