Select Code to Download

/#.*#/ and next;       # same row

  /#(?:.{$gap}..)*.{$gap}.#/s and next; # same column

push @queue, "$`#$'" =~ s/$&/\l$&/gr while /$&/g;

print 'yes' if 'a' =~ /(b|)/;