Lấy cảm hứng từ câu hỏi này trên AskUbfox.

Công việc của bạn cực kỳ đơn giản. Lấy biến môi trường PATH ( echo $PATH) và xuất nó sao cho mỗi mục (được phân tách bằng :ký tự) nằm trên một dòng riêng.

Ví dụ: nếu PATH là /bin:/usr/bin:/usr/local/bin, chương trình của bạn sẽ xuất ra:

/bin
/usr/bin
/usr/local/bin

Chương trình của bạn có thể không trả về một dòng mới hàng đầu, nhưng nó có thể trả về một dòng mới duy nhất. Bạn không cần phải kiểm tra xem PATH có đúng không, hoặc thư mục có tồn tại không. Chương trình của bạn sẽ không mất dữ liệu đầu vào, có nghĩa là chương trình của bạn chịu trách nhiệm lấy chính PATH. Bạn có thể giả định một cách an toàn rằng các đối tượng trong PATH không chứa :hoặc dòng mới. Tuy nhiên, không gian là trò chơi công bằng.

Tham khảo thực hiện có mặt trong các câu trả lời cho câu hỏi trên.

Quy tắc

• Đây là (rõ ràng) mã golf, vì vậy câu trả lời ngắn nhất sẽ giành được dấu kiểm màu xanh lá cây được đánh giá cao.
• Câu trả lời được chấp nhận sẽ được kiểm tra để đảm bảo rằng nó thực sự hợp pháp.
• Cả hai mục Windows và * nix đều được chấp nhận.
  • Tuy nhiên, nếu bạn không chỉ định rõ ràng Windows, tôi sẽ thử chạy nó trong Linux và thất bại. (Nếu nó rõ ràng (hi, Batch!), Bạn không cần chỉ định rõ ràng.)
• Chỉ có một giải pháp cho mỗi câu trả lời. Nếu bạn có cả phiên bản Windows và * nix, tôi sẽ tính phiên bản ngắn hơn.
• Nếu hai câu trả lời có cùng độ dài, tôi sẽ ưu tiên cho câu trả lời có tổng số phiếu cao hơn. Nếu họ có tổng số phiếu bầu tương tự, tôi sẽ tính người lớn tuổi hơn. Nếu thời gian đăng là như nhau, tôi sẽ chọn thời gian thực hiện nhanh hơn. Nếu họ thực hiện trong cùng một khoảng thời gian, tôi không biết.

Bảng xếp hạng

var QUESTION_ID=96334,OVERRIDE_USER=15422;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

Vỏ Z (zsh), 13 byte

<<<${(F)path}

Sử dụng $paththam số , là tham số mảng đặc biệt được sử dụng bởi shell được gắn với $PATHtham số và cờ mở rộng tham số để nối một mảng với dòng mới.

Bash / Coreutils, 17 16 byte

tr : '
'<<<$PATH

Mẻ, 41 byte

@for %%a in ("%PATH:;=";"%")do @echo %%~a

PATHTất nhiên là dấu chấm phẩy trên Windows. Thuận tiện, forchia theo dấu chấm phẩy theo mặc định, nhưng bất tiện, cũng trên không gian, vì vậy tôi phải sử dụng chuỗi thay thế thủ thuật để trích dẫn từng phần tử đường dẫn trước khi chia. Nó vẫn còn để loại bỏ các trích dẫn sau đó.

Vỏ Z (zsh), 15 byte

<<<${PATH//:/
}

Bạn có thể kiểm tra mã trên Anarchy Golf : nhấp vào sử dụng mẫu , chọn zsh , dán mã và gửi.

Bash (thuần túy), 19 byte

echo "${PATH//:/
}"

Cùng một ý tưởng, nhưng với cú pháp ít golf hơn của Bash. Kiểm tra nó trên Ideone .

Powershell, 20 byte

$env:PATH-split':'

Chỉnh sửa:

• Tắt 2 byte. Cảm ơn @TimmyD

Cũ:

$env:PATH.split(":")

Ruby, 25 byte

puts ENV["PATH"].split":"

Perl, 22 byte

say$ENV{PATH}=~y/:/
/r

Cần -Ehoặc -M5.010để chạy:

perl -E 'say$ENV{PATH}=~y/:/
/r'

Bash + Python, 43 byte

Hãy sử dụng mở rộng biến của shell. Nó loại bỏ cuộc gọi os.environ, do đó ít mã hơn và nhập khẩu ít hơn. Điều đó mang lại cho chúng tôi 46 byte và với xnorthủ thuật và loại bỏ không gian trước khi -cchúng tôi có 43 byte.

python -c"print('$PATH'.replace(*':\n'))"

Java, 58 byte

System.out.print(System.getenv("Path").replace(';','\n'));

Chương trình đầy đủ: 106 byte

class E {
    public static void main (String[] args) {
        System.out.print(System.getenv("Path").replace(';', '\n'));
    }
}

GNU sed+ bash, 25 byte:

sed 's/:/\n/g' <<<"$PATH"

Nếu PATHkhông chứa tên thư mục có khoảng trắng, không cần trích dẫn, 23 byte:

sed 's/:/\n/g' <<<$PATH

Thậm chí ngắn hơn, chuyển ngữ :sang dòng mới, nhờ @Dennis :

sed y/:/\\n/<<<"$PATH"

Vim, 19 byte

"=$PATH<CR>p:s/:/\r/g<CR>

Lấy $PATHtừ thanh ghi biểu thức và dán nó. Biến :s thành dòng mới. Không có gì khó khăn.

PHP, 36 35 33 32 byte

Đã lưu 1 byte, nhờ Blackhole
Lưu 2 byte, nhờ người dùng59178
đã lưu 1 byte, nhờ Martijn

* phiên bản nix

<?=strtr(getenv(PATH),":","
")?>

Phiên bản Windows

<?=strtr(getenv(PATH),";","
")?>

Python 2, 49 byte

Tiết kiệm 2 byte nhờ @xnor và 1 byte bằng cách thay thế environbằng getenvcảm ơn @Serg và @Oliver

import os
print os.getenv('PATH').replace(*':\n')

Đối với Python 3, chỉ cần thêm (và )xung quanh printđối số và thêm 1 vào số byte.

C, 85 84 byte

-1 byte để sử dụng #import

#import<stdlib.h>
main(){char*a=getenv("PATH");while(*a)putchar(*a++==58?10:a[-1]);}

Vợt 39 byte

Sử dụng lệnh sed của @heemayl:

(system "sed 's/:/\\n/g' <<<\"$PATH\"")

Ung dung:

(define (f)
  (system "sed 's/:/\\n/g' <<<\"$PATH\"")
)

Kiểm tra:
(f)

Đầu ra:

/usr/local/bin
/usr/bin
/bin
/usr/games
/usr/lib/java/bin
/usr/lib/java/jre/bin
#t

Scala, 31 byte

sys env "PATH"replace(':','\n')

Trong scala, a b clà cú pháp đường cho a.b(c), vì vậy điều này biên dịch thànhsys.env("PATH").replace(':','\n')

Perl 6 ,  28 25  24 byte

%*ENV<PATH>.split(':')».put

put %*ENV<PATH>~~tr/:/\n/

put %*ENV<PATH>~~tr/:/
/

C #, 64 byte

x=>Environment.GetEnvironmentVariable("PATH").Replace(";","\n");

Hàm ẩn danh trả về biến đường dẫn, mỗi thư mục trên một dòng riêng biệt. Lưu ý rằng đó xchỉ là một đối tượng giả để lưu 1 byte thay vì sử dụng() .

Chương trình đầy đủ:

using System;

namespace ExportPathVariable
{
    class Program
    {
        static void Main(string[] args)
        {
            Func<object,string>f= x=>Environment.GetEnvironmentVariable("PATH").Replace(";","\n");

            Console.WriteLine(f(0));
        }
    }
}

Cũng hoạt động trên các hệ thống UNIX nếu bạn thay thế ;bằng :, giả sử các thư viện Mono có sẵn. Dùng thử trực tuyến trên ideone , .NET Fiddle trả về một ngoại lệ bảo mật.

Ngoài ra, một chương trình C # đầy đủ, khá dài dòng:

C #, 118 byte

using System;class P{static void Main(){Console.Write(Environment.GetEnvironmentVariable("PATH").Replace(";","\n"));}}

Haskell, 72 byte

import System.Environment
m ':'='\n'
m x=x 
map m<$>getEnv"PATH">>=putStr

Một nhập khẩu đắt tiền và không có replacetrong thư viện tiêu chuẩn làm cho nó khá dài.

C (x86), 60 byte

f(){char*p=getenv("PATH");for(;*p;p++)putchar(*p-58?*p:10);}

Điều này sẽ không hoạt động trên nền tảng 64 bit mà không bao gồm stdlib.h , vì getenv trả về một int (32 bit) trong khi con trỏ char rộng 64 bit.

Tôi vẫn chưa tìm thấy trình biên dịch C 32 bit trực tuyến.

C (x86-64), 70 byte

f(){char*getenv(),*p=getenv("PATH");for(;*p;p++)putchar(*p-58?*p:10);}

Thay vì bao gồm stdlib.h , chúng tôi tự khai báo getenv là một hàm trả về một con trỏ char .

Tôi đã thử nghiệm điều này với gcc và clang trên Linux; thiết lập khác có thể khóc máu. Hãy thử nó trên Ideone .

Yếu tố , 28 byte

cho unix-thích. Tôi không biết làm thế nào để làm điều đó trên Windows vì tôi không ở trong hộp Windows.

"PATH"getenv ":" "\n"replace

jq, 18 ký tự

(Tùy chọn dòng lệnh 16 ký tự + 2 ký tự)

env.PATH/":"|.[]

Chạy mẫu:

bash-4.3$ PATH='/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin'

bash-4.3$ jq -nr 'env.PATH/":"|.[]'
/usr/local/sbin
/usr/local/bin
/usr/sbin
/usr/bin
/sbin
/bin

Awk, 51 44 ký tự

BEGIN{$0=ENVIRON["PATH"];gsub(":",RS);print}

Nhờ vào:

• ninjalj để đề xuất sử dụng gsub()thay vì thao tác các biến tích hợp (-7 ký tự)

Cách điển hình awklà thiết lập các biến tích hợp có ảnh hưởng đến cách awkthao tác dữ liệu tự động:

BEGIN{FS=":";OFS=RS;$0=ENVIRON["PATH"];$1=$1;print}

Chạy mẫu:

bash-4.3$ PATH='/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin'

bash-4.3$ awk 'BEGIN{FS=":";OFS=RS;$0=ENVIRON["PATH"];$1=$1;print}'
/usr/local/sbin
/usr/local/bin
/usr/sbin
/usr/bin
/sbin
/bin

Node.js, 36 byte

_=>process.env.PATH.split`:`.join`
`

Khá thẳng về phía trước.

MATLAB, 34 byte

disp(strrep(getenv('PATH'),58,10))

Đây là một bản demo trực tuyến trong Octave với một sửa đổi nhỏ vì strreptrong quãng tám yêu cầu đầu vào thứ hai và thứ ba phải là charbiến chứ không phải là giá trị số.

R, 38 byte

cat(gsub(":","\n",Sys.getenv('PATH')))

Lấy $ PATH, thay thế :bằng dòng mới và bản in ra thiết bị xuất chuẩn. Bạn có thể thử nó trực tuyến ở đây.

Groovy, 43 byte

System.env['PATH'].replaceAll(":","\n")​​​​

Gema, 36 ký tự

\A=@subst{\\:=\\n;@getenv{PATH}}@end

Chạy mẫu:

bash-4.3$ PATH='/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin'

bash-4.3$ gema '\A=@subst{\\:=\\n;@getenv{PATH}}@end'
/usr/local/sbin
/usr/local/bin
/usr/sbin
/usr/bin
/sbin
/bin

Dấu vân tay Befunge-98 + EVAR, 34 byte

"RAVE"4("HTAP"Gv
:!k@:':-!'0*-, >

Tải dấu vân tay EVAR ( "RAVE"4() để dễ dàng truy cập các biến môi trường, lấy PATH envvar ( "HTAP"G) và với mỗi ký tự, thoát khỏi chương trình nếu ký tự là "\ 0" ( :!k@), tạo thành ASCII 48 "0" nếu char là ASCII 58 ":" ( :':-!'0*-) và xuất ký tự ( ,).

ELF / x86, 78 byte

00000000  7f 45 4c 46 01 00 00 00  43 0f 00 00 43 5f eb 10  |.ELF....C...C_..|
00000010  02 00 03 00 0c 50 eb 10  0c 50 eb 10 04 00 00 00  |.....P...P......|
00000020  5f 5f b1 05 be 49 50 eb  10 3d 20 00 01 00 5f f3  |__...IP..= ..._.|
00000030  a6 75 ef 89 f9 80 3f 3a  75 03 80 2f 30 42 ae 75  |.u....?:u../0B.u|
00000040  f4 4a 04 04 cd 80 93 cd  80 50 41 54 48 3d        |.J.......PATH=|
0000004e

Nguồn NASM:

BITS 32                                         ;
ORG 0x10eb5000                                  ;
                                                ;   ELF HEADER    --   PROGRAM HEADER
; ELF HEADER                                    ; +-------------+
DB 0x7f,'E','L','F'                             ; | magic       |    +--------------------+
                                                ; |             |    |                    |
; PROGRAM HEADERS                               ; |             |    |                    |
DD 1                                            ; |*class   32b | -- | type: PT_LOAD      |
                                                ; |*data   none |    |                    |
                                                ; |*version   0 |    |                    |
                                                ; |*ABI    SysV |    |                    |
DD 0xf43        ; offset = vaddr & (PAGE_SIZE-1); |*ABI vers    | -- | offset             |
                                                ; |             |    |                    |
entry:  inc     ebx     ; STDOUT_FILENO         ; |*PADx7       | -- | vaddr = 0x10eb5f43 |
        pop     edi     ; discard argc          ; |             |    |                    |
        jmp     short skip                      ; |             |    |                    |
DW 2                                            ; | ET_EXEC     | -- |*paddr LO           |
DW 3                                            ; | EM_386      | -- |*paddr HI           |
DD 0x10eb500c                                   ; |*version     | -- | filesz             |
DD 0x10eb500c                                   ; | entry point | -- | memsz              |
DD 4                                            ; | ph offset   | -- | flags: RX          |
                                                ; |             |    |                    |
skip:   pop     edi     ; discard argv[0]       ; |*sh offset   | -- |*align              |
        pop     edi     ; discard argv[1]=NULL  ; |             |    |                    |
env:    mov     cl,5    ; \ strlen("PATH=")     ; |             |    |                    |
        mov     esi,PATH; > "PATH="             ; |*flags    /--|    |                    |
DB 0x3d         ; cmp eax,0x10020               ; |*ehsize      |    +--------------------+
DW 32                                           ; | phentsize   |
DW 1                                            ; | phnum       |
                                                ; |             |
        pop     edi     ; > envp                ; |*shentsize   |
        repe    cmpsb   ; > strcmp(envp,"PATH="); |*shnum       |
        jne     env     ; /                     ; |*shstrndx    |
        mov     ecx,edi                         ; +-------------+

nlcolon:cmp     byte[edi],58  ; \ if (char == ':')
        jne     nosub         ; >
        sub     byte[edi],48  ; >   char -= '0'
nosub:  inc     edx           ; > wlen++
        scasb                 ; >
        jne     nlcolon       ; / while(char != 0)

        dec     edx           ; wlen--
        add     al,4
        int     0x80          ; write(1, ecx, wlen)
        xchg    eax,ebx
        int     0x80          ; exit(...)

PATH: db "PATH="