Revision 2f81b64db8354256919d128aecf368a17b27f8d2 authored by Richard Levitte on 12 July 2004, 12:49:29 UTC, committed by Richard Levitte on 12 July 2004, 12:49:29 UTC
1 parent 3001755
deleof.pl
#!/usr/local/bin/perl
while (<>)
{
print
last if (/^# DO NOT DELETE THIS LINE/);
}

Computing file changes ...