while (<SOURCE>) {
   $script = <SOURCE>;