source-engine/thirdparty/openssl/util/deleof.pl

8 lines
88 B
Perl
Raw Normal View History

2020-10-22 17:43:01 +00:00
#!/usr/local/bin/perl
while (<>)
{
print
last if (/^# DO NOT DELETE THIS LINE/);
}