-     if ( $topline =~ /(\s+)\#\!/ ) {
+     if ( $topline =~ /(\s+)\