O Sr. William Shakespeare escreveu peças. Muitas peças. Neste pacote contendo cada uma de suas obras, cada uma de suas peças é um arquivo longo.
Ele precisa ser dividido em cenas para uma produção de palco. Como os atores são impacientes, seu código precisa ser o mais curto possível.
Tarefa:
Sua tarefa é escrever um programa ou função para dividir as execuções contidas neste arquivo em arquivos separados, numerados sequencialmente a partir de 1
, onde cada um contém uma cena. Você deve manter todos os espaços em branco e títulos.
Entrada:
A entrada será uma única reprodução via stdin
ou o nome do arquivo como parâmetro. Você pode escolher. A peça será parecida com:
TITUS ANDRONICUS
DRAMATIS PERSONAE
SATURNINUS son to the late Emperor of Rome, and afterwards
declared Emperor.
BASSIANUS brother to Saturninus; in love with Lavinia.
TITUS ANDRONICUS a noble Roman, general against the Goths.
MARCUS ANDRONICUS tribune of the people, and brother to Titus.
LUCIUS |
|
QUINTUS |
| sons to Titus Andronicus.
MARTIUS |
|
MUTIUS |
Young LUCIUS a boy,
[...]
ACT I
SCENE I Rome. Before the Capitol.
[The Tomb of the ANDRONICI appearing; the Tribunes
and Senators aloft. Enter, below, from one side,
SATURNINUS and his Followers; and, from the other
side, BASSIANUS and his Followers; with drum and colours]
SATURNINUS Noble patricians
[...]
ACT I
SCENE II A forest near Rome. Horns and cry of hounds heard.
[Enter TITUS ANDRONICUS, with Hunters, &c., MARCUS,
LUCIUS, QUINTUS, and MARTIUS]
TITUS ANDRONICUS The hunt is up, the morn is bright and grey,
The fields are
[...]
ACT II
SCENE I Rome. Before the Palace.
[Enter AARON]
AARON Now climbeth Tamora
[...]
Resultado:
A saída deve ser algo como isto:
ATO I CENA I Roma. Antes do Capitólio. [O túmulo dos ANDRONICI aparecendo; os tribunos e senadores no alto. Digite, abaixo, de um lado, SATURNINUS e seus seguidores; e, por outro lado, BASSIANUS e seus seguidores; com tambor e cores] SATURNINUS Nobres patrícios ...
ATO I Cena II Uma floresta perto de Roma. Chifres e gritos de cães são ouvidos. [Digite TITUS ANDRONICUS, com Hunters, etc., MARCUS, LUCIUS, QUINTUS e MARTIUS] TITUS ANDRONICUS A caçada terminou, a manhã é brilhante e cinza, Os campos são ...
ATO II CENA I Roma. Antes do palácio. [Digite AARON] AARON Agora escala Tamora ...
etc.
Saída em arquivos numerados ou no stdout
fluxo (retornando para funções) com um deliminador de sua escolha.
Bônus:
- 10% Se você salvar o bit anterior ao Ato 1 no arquivo
0
. Nota: Não deve quebrar se o bit anterior ao Ato 1 estiver vazio. - 15% Se você pode
stdin
usar entradas de parâmetro de caminho de arquivo e de ambos - 20% Se você pode gerar os arquivos para
stdout
/ retornar. 200 reputação se você puder criar o menor programa de SPL.Esta recompensa foi concedida.
Classificação
Aqui está um snippet de pilha para gerar uma classificação regular e uma visão geral dos vencedores por idioma.
Para garantir que sua resposta seja exibida, inicie-a com um título, usando o seguinte modelo de remarcação:
# Language Name, N bytes
onde N
está o tamanho do seu envio. Se você melhorar sua pontuação, poderá manter as pontuações antigas no título, identificando-as. Por exemplo:
# Ruby, <s>104</s> <s>101</s> 96 bytes
Se você quiser incluir vários números no cabeçalho (por exemplo, porque sua pontuação é a soma de dois arquivos ou deseja listar as penalidades do sinalizador de intérpretes separadamente), verifique se a pontuação real é o último número no cabeçalho:
# Perl, 43 + 2 (-p flag) = 45 bytes
Você também pode transformar o nome do idioma em um link que será exibido no snippet do placar de líderes:
# [><>](http://esolangs.org/wiki/Fish), 121 bytes
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><script>var QUESTION_ID=68997,OVERRIDE_USER=43394;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;</script>
Respostas:
Linguagem de programação Shakespeare 1.2.1 ,
930895887 - 10% = 798,3 bytesUngolfed e reescrito na língua sharkspearean:
No psuedocode do tipo C:
Requer que o arquivo de entrada contenha pelo menos 3 caracteres. Usa "@" como delimitador e relata os resultados ao stdout. Estou recebendo o bônus de 10%, já que a parte anterior à primeira cena será anterior ao primeiro "@", semelhante à solução de Martin Büttner acima.
A maneira como funciona é colocar um "@" se vir três caracteres "ACT" em uma linha. Observe que isso significa que ele transformaria "ENACTED" em "EN @ ACTED". Isso pode ser corrigido ao custo de algumas centenas de bytes, mas, felizmente, parece que todo "ACT" nas peças dadas (pelo menos as poucas que eu verifiquei) foi o início de uma cena.
Testado com o SPL 1.2.1 vinculado acima. Não tenho certeza se funcionará no intérprete da web. O script usado para o teste foi:
As partes "esotéricas" da SPL, depois de passar pela sintaxe, são o embaralhamento de variáveis no "palco" (geralmente, você só quer ter dois caracteres no palco de cada vez) e a representação de números constantes. Existem 6 listas de palavras importantes importadas com a distribuição: adjetivos positivos, adjetivos neutros, adjetivos negativos, substantivos positivos, substantivos neutros e substantivos negativos. Um substantivo positivo / neutro (isto é, ameixa ou muro de pedra) é 1 e um substantivo negativo (isto é, flerte-brânquia ou Microsoft) é -1. Os adjetivos positivos / neutros (isto é, bordados ou sem fundo) multiplicam o número por 2, e os adjetivos negativos (isto é, rins ou sem pai) multiplicam por -2. Infelizmente, as listas de palavras são bastante limitadas, com apenas 10 a 20 entradas cada.
Na minha próxima reunião, sugerirei que movamos todo o nosso código de produção para Shakespeare, porque é muito mais expressivo que o Scala.
fonte
Retina , 9 - 10% = 8,1 bytes
A contagem de bytes assume a codificação ISO 8859-1.
Insere um
=
(como delimitador) na frente de tudo oACT
que é precedido por um avanço de linha e seguido por um espaço.Experimente online! (Mas você terá que copiar a entrada por conta do tamanho.)
fonte
awk, 51 * .9 * .85 * .8 = 31.2
Divide em vários arquivos. Saídas
stdout
separadas por a=
.fonte
stdout
separados por um caractere específico, e pronto!JavaScript ES6, 28 - 10% = 25,2 bytes
Nem o shell JS possui E / S de arquivo, portanto, isso não pode se qualificar para o bônus de -20%
Experimente online aqui (você precisará colar a entrada em si mesmo)
fonte
T
byte salvo.$&
que não vaiPerl, 66 - 10% - 20% = 47,52 bytes
Adicionado um para a
-p
opção.fonte
Ruby, 30 - 10% - 15% =
23.71522.95 bytesDivide a entrada ativada
$
. O bônus de 15% se aplica porque o Ruby redireciona$<
para apontar para o arquivo passadoARGV
por padrão, se ele for fornecido ouSTDIN
não.-1 byte, aproveitando
gsub
a solução semelhante ao @Downgoat ES6, mas ainda estou aproveitando a esperança de queACT
apenas apareça nos rótulos do ACT e não em nenhuma outra palavra, apenas porqueAlém disso, minha solução de 41.004 (originalmente 67) bytes que também gera saída de arquivo. Estrelando provavelmente a única vez em que o
each
comando salva bytesmap
em Ruby, porqueeach
retorna a matriz passada sem adulteração após executar seu bloco, ao contráriomap
.fonte