ssl/ssl_ciph.c: interim solution for assertion in d1_pkt.c(444) [from HEAD].
[oweals/openssl.git] / util / deleof.pl
1 #!/usr/local/bin/perl
2
3 while (<>)
4         {
5         print
6         last if (/^# DO NOT DELETE THIS LINE/);
7         }