Revision 4d27e3d339ea3e6bff22f96ef2f7b67dc25899d7 authored by Andy Polyakov on 21 August 2007, 15:26:51 UTC, committed by Andy Polyakov on 21 August 2007, 15:26:51 UTC
1 parent 7d59e44
deleof.pl
#!/usr/local/bin/perl
while (<>)
{
print
last if (/^# DO NOT DELETE THIS LINE/);
}

Computing file changes ...