เมื่อพิจารณาภูมิประเทศของที่ดินในรูปแบบภาพ ASCII ให้คิดว่าทะเลสาบจะไปที่ใดและเติมเต็มให้สมมติว่ามีฝนตกไม่ จำกัด

ตัวอย่าง

อินพุต

         #               
         ##              
      # ####             
#    #########           
##  ###########          
## #############   ####  
## ##############  ##### 
################# #######
#########################
#########################

เอาท์พุต

         #               
         ##              
      #@####             
#@@@@#########           
##@@###########          
##@#############@@@####  
##@##############@@##### 
#################@#######
#########################
#########################

อินพุตจะมีช่องว่างและ#เครื่องหมายเท่านั้น แต่ละบรรทัดจะมีความยาวเท่ากัน ผลลัพธ์ควรเป็น#รูปแบบที่เหมือนกันกับช่องว่างที่น้ำจะสะสมด้วย@เครื่องหมาย

แถวล่างสุดจะเป็นเครื่องหมาย # ทั้งหมด จะไม่มีรูหรือสิ่งที่แขวนอยู่ในแผ่นดิน รหัสที่สั้นที่สุดชนะ

sed -r, 27 24 (27 กับ-r)

24 (27):

:;s/(#|@) ( *#)/\1@\2/;t

27 (30):

:e;s/([#@]) ( *#)/\1@\2/;te

แข่งขันกับโซลูชั่น perl ที่ดีกว่า

Perl, 25

s/# +#/$_=$&;y| |@|;$_/ge

Perl (> = v5.9.5), 24 ตัวอักษร

ทำงานด้วยperl -p:

1while s/#.*\K (?=\S)/@/

นี้ต้องใช้ Perl 5.9.5 \Kหรือสูงกว่าที่จะใช้หลบหนีพิเศษ

Windows PowerShell, 36 74 138

$input-replace'(?<!^ *) (?! *$)','@'

เรติน่า 10 ไบต์

จอประสาทตานั้นใหม่กว่าความท้าทายนี้มาก แต่วิธีนี้เรียบร้อยเกินไปที่จะไม่โพสต์:

T` `@`#.*#

ลองออนไลน์

นี่เป็นเพียงขั้นตอนการถอดเสียงซึ่งแทนที่ช่องว่างด้วย@แต่การดำเนินการถูก จำกัด ให้ตรงกับของ#.*#คือตัวละครที่ล้อมรอบด้วยที่ดินทั้งสองด้าน

Ruby 1.8, 30 ตัวอักษร

#!ruby -p
gsub(/# +#/){$&.tr" ","@"}

หากใครมีความคิดว่าทำไมสิ่งนี้ถึงใช้งานไม่ได้ใน Ruby 1.9 (ทดสอบด้วย 1.9.2p0 และ 1.9.2p204) ถึงแม้ว่าเอกสารจะบอกว่ามันควรใช้งานได้โปรดแจ้งให้เราทราบ!

Python, 95 92 ไบต์

for s in S.split('\n'):b=s.find('#');e=s.rfind('#');print s[:b]+s[b:e].replace(' ','@')+s[e:]

05AB1E , 17 16 ไบต์

|εγć?D¨ð'@:sθJJ,

ลองออนไลน์

คำอธิบาย:

|            # Take all input-lines as list
 ε           # For each line:
  γ          #  Split the line into chunks of consecutive equal characters
             #   i.e. " ##   # " → [' ','##','   ','#',' ']
   ć         #  Split into head and the rest of the list
             #   i.e. [' ','##','   ','#',' '] → ['##','   ','#',' '] and ' '
    ?        #  Print this head
   D         #  Duplicate the rest of the list
    ¨        #  Remove the last element
             #   i.e. ['##','   ','#',' '] → ['##','   ','#']
     ð'@:    #  Replace every space with a "@"
             #   i.e. ['##','   ','#'] → ['##','@@@','#']
     sθ      #  Swap so the duplicated list is at the top, and take the last item as is
             #   i.e. ['##','   ','#',' '] → ' '
         JJ  #  Join the lists and individual items in the list together to a single string
             #   i.e. ['##','@@@','#'] and ' ' → "##@@@# "
           , #  Print with trailing new-line

Javascript, 107 ไบต์

var f=function(x){return x.replace(/# +#/g, function(x){return "#"+new Array(x.length-1).join("@")+"#";})};

Ungolfed:

var f = function(x) {
    return x.replace(/# +#/g, function(x){
        return "#" + new Array(x.length - 1).join("@") + "#";
    })
};

Python, 108 106 92 ไบต์

import re
n=1
while n: S,n=re.subn('# +#',lambda m:'#'+'@'*len(m.group(0)[2:])+'#',S)
print S

เยลลี่ 15 ไบต์

Ỵ”@ẹ”#ṂrṀḟƲ$¦€Y

ลองออนไลน์!

Pip 15 ไบต์

aR:`#.*#`_TRs'@

รับอินพุตเป็นสตริงหลายบรรทัดผ่านอาร์กิวเมนต์บรรทัดคำสั่ง: ลองออนไลน์! (อีกทางหนึ่งระบุการตั้ง-rnค่าสถานะและเปลี่ยนรายการแรกaเป็นgและคุณสามารถป้อนข้อมูลผ่าน stdin: ลองออนไลน์! )

แนวคิดเดียวกับคำตอบที่จอประสาทตา: แทนที่ทุกการแข่งขันของ regex #.*#ด้วยผลลัพธ์ของการทับศัพท์พื้นที่@ในการแข่งขัน Pip ไม่สามารถเทียบเคียงกับ Retina ได้สำหรับปัญหา regex ที่แท้จริง - แต่ไม่ใช่ทุกวันที่คุณสามารถผูกกับ Jelly ได้