Hmm, Geoff's change made things quite interesting. We can now give

[openssl.git] / util / deleof.pl

#!/usr/local/bin/perl

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