1284285Sjkim#!/usr/local/bin/perl 2110010Smarkm 3110010Smarkmwhile (<>) 4160819Ssimon { 5110010Smarkm print 6110010Smarkm last if (/^# DO NOT DELETE THIS LINE/); 7110010Smarkm } 8110010Smarkm