#!/usr/bin/perl -w
use strict;

$^I = ".bak";
while (<>) {
  if (/^#!/) {
  $_ .= "## Copyright (C) 2008 by C'est Mois";
  }
 
}