#!/usr/bin/perl

while(<>) {
  chomp;
  if(! /index\.html/) { print "$_\n"; }
}