elsif ($dungeon[$start] eq '#' && $dungeon[$start] + 1 eq '#' 

##</code><code>##

elsif ($dungeon[$start] eq '#' && $dungeon[$start+1]  eq '#'