# OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN CONNECTION WITH THE USE OR
# PERFORMANCE OF THIS SOFTWARE.
-# $Id: update_copyrights,v 1.26.206.12 2005/05/16 00:01:42 marka Exp $
+# $Id: update_copyrights,v 1.26.206.13 2005/09/06 01:59:59 marka Exp $
require 5.002;
if (/^<!DOCTYPE/) {
$before_copyright = $_;
$_ = <SOURCE>;
- while (! /^<!/ ) {
+ ;
+ while (!eof(SOURCE) && ! /^<!/ ) {
$before_copyright = "$before_copyright$_";
$_ = <SOURCE>;
}
+ if (eof(SOURCE)) {
+ close(SOURCE);
+ next;
+ }
}
if (/^<!/) {
$_ = <SOURCE> if $_ eq "<!--\n";