您的程序：

您将编写两个程序（都使用相同的语言）。存储程序从STDIN中获取一个字符串，并将其存储在持久的位置（请参见下文），然后无错误退出。检索程序不输入任何内容，检索存储的字符串，然后将其打印到STDOUT。

持久性的客观测试：

您应该能够在本地计算机上运行存储程序，然后重新启动本地计算机，然后调用本地计算机上的检索程序。只要通过此重新启动测试，就可以随意存储字符串（即使在Web上）。

测试用例：

存储然后检索：

echo foo | Store
Retrieve
foo

重复存储应覆盖（如set（）方法）：

echo foo | Store
echo bar | Store
Retrieve
bar

重复检索是非破坏性的（例如get（）方法）：

echo foo | Store
Retrieve
foo
Retrieve
foo

在调用存储之前进行检索：

您无需为此担心。您的检索程序可以假定该存储程序已在过去的某个时间运行。

输入/输出灵活性。

人们要求我将其从严格的STDIN / STDOUT扩展到标准IO规则。我不能，因为这会引入太多漏洞。一些标准IO选项已经以持久方式存储了输入，例如“程序可以从文件中获取输入”。我想比严格的STDIN和STDOUT更灵活，但不要打开闸门。

从标准的IO规则线程中，我正在挑选那些不会克服挑战的规则：

• 如果需要，程序可以通过GUI提示符和命令行提示符进行输入

• 程序可以通过在屏幕上显示来输出，包括GUI对话框

• 程序可以通过命令行参数进行输入

• 程序可以输出到STDERR，但实际上仍然不会引发错误。

如果使用备用选项，则必须是用户交互的。除了将输入输入到程序中，将其输入程序提供的提示中或将输入作为程序的命令行参数输入之外，用户无需执行任何其他工作。除了运行您的检索程序之外，用户无需执行任何其他操作即可看到屏幕上显示的输出或发送到STDOUT或STDERR的输出。

允许的假设：

• 您的两个程序将在同一目录中运行
• 您的程序对该目录具有读写权限
• 您创建的文件将在重启后保留下来（不在临时目录中）
• 允许使用不属于字符串的尾随换行符。没有其他尾随空格

这是代码高尔夫球，您的得分是这两个程序的字节总和。

zsh，4个字节

存储：（>f从STDIN读取并写入一个名为的文件f）
检索：（<f将的内容写入fSTDOUT）

TI-BASIC（Z80），1 个字节？

存储：（ 只需输入字符串）
检索：（Ans字节27）

但是，如果那是无效的：

TI-BASIC（Z80），7 6 字节

-1感谢雅各布。

存储：（Prompt Str0字节DD AA 09）
检索：（disp Str0字节ED AA 09）

浏览器JS，44个字节

店铺：

localStorage.a=prompt()

检索：

alert(localStorage.a)

POSIX shell sh / bash / ... 8字节

商店：

dd>f

得到：

dd<f

Python 3，46个字节

存储，45个字节：

open(*'fw').write('print(%r)'%open(0).read())

检索程序由store命令（名为的文件）构建f。（文件名1个字节）

批处理，16个字节

COPY CON A
TYPE A

Powershell-4字节

存储：

ac

（也可以sc）

恢复

gc

编辑：我只是注意到输出不允许任何用户输入...因此它从4跳到6或8个字节

存储：

ac f

（也可以选择sc f）8字节版本

ac

（并指定f为路径）6字节版本

恢复

gc f

锈，136字节

存储（84字节）

use std::{fs::*,io::*};

||{let mut v=vec![];stdin().read_to_end(&mut v);write("a",v)}

检索（52个字节）

||print!("{}",std::fs::read_to_string("a").unwrap())

致谢

• -1个字节，得益于硕果累累

重击 12 11 10字节

商店， 7 6 5字节

cat ->f＃不需要-，默认为stdin

cat >f＃不需要空间，也可以>分开

cat>f

检索，5个字节

cat f

HP 49G RPL，48字节

保存：:2: A DUP PURGE STO，26.5字节

恢复：:2: A RCL，21.5字节

如果我们可以留在备用电池中，则会得到：

HP 49G RPL，0个字节

保存：，0个字节

要恢复：0个字节，因为HP 49G在重新启动后不会影响堆栈。

APL（APLX），5 个字节

商店：⍞⍈1
检索：⍇1

⍞ 从stdin获取行
⍈1 写入文件编号1的下一个可用组件

⍇1 读取文件编号1 的第一个 *最后一个部分

*文档首先说，但实验最后显示。

bash，10字节（无竞争）

touch $@
ls

Unix文件名可以包含NUL和以外的任何字符/，并且它们的名称最长可以为255个字节，因此它只能存储不超过该长度的字符串（考虑到存储介质的限制），并且不包含'/ ' 在他们中。这是不竞争的一个原因，另一个原因是假定运行它的目录为空（或ls允许输出无关的信息）。我仍然想发布此信息，因为这似乎是一种很酷且不明显的信息存储方式。

具有相同长度和字符限制的另一个类似原因是：

35 33字节

mkdir -p $@
find|sed '$!d;s/..//'

这允许/字符串中的字符，并支持更多的字符（确切的数量取决于实现）。

（-2字节感谢@Cows嘎嘎声）

Python 3，56个字节

存储（33字节）

open(*'aw').write(open(0).read())

检索（23个字节）

print(open('a').read())

用尾随换行符打印。

Japt，46个 30字节

^{-16个字节，感谢Shaggy。}

我尝试使用Japt的第一次。JS评估有时可能很烦躁。使用浏览器的window.localStorage。

存储（16字节）

Ox`lo¯lSÈSge.P=U

检索（14个字节）

Ox`lo¯lSÈSge.P

Haskell，46个字节

存储（26个字节）：

getContents>>=writeFile"t"

检索（20个字节）：

readFile"t">>=putStr

红宝石（26字节）

设置（16字节）

IO.write'a',gets

获取（10字节）

IO.read'a'

MATLAB（30字节）

设置（22字节）

a=input('','s');save a

可以通过更改为来减少4个字节input('')，但这将要求输入使用单引号引起来：'input string'

获取（8个字节）

load a;a

C（GCC），98个字节

存储（46字节）

通过第一个命令行参数输入。

main(c,v)char**v;{fputs(v[1],fopen("a","w"));}

检索（52个字节）

c,d;r(){for(d=open("a",0);read(d,&c,1);)putchar(c);}

不可移植性

• 要求几种指针类型适合int。

致谢

• -2个字节归功于ceilingcat
• -10个字节，感谢Peter Cordes

APL（Dyalog Unicode），18字节

商店：⍞⎕NPUT⎕A 1 在线尝试！
检索：⊃⎕NGET⎕A 在线尝试！

⍞ 从stdin获取行，
⎕NPUT 将其放入名为
⎕A 大写字母 的本机文件中1 ，如果文件存在则覆盖

⊃
⎕NGET 获取本机文件
⎕A 的大写字母 的第一部分（数据，下一部分是编码和行尾类型）

R（27个字节）

存储（21个字节）

x=readLines('stdin')

加载（6个字节）

cat(x)

为此，第一个脚本需要使用命令行选项调用，第二个脚本需要--save使用--restore（虽然在交互模式下，这不是必需的：这些选项是默认选项）。

如果不是因为R中的错误阻止默认参数readLine在非交互模式下工作，则可以将其缩短7个字节。在交互模式下，没有必要，因此解决方案仅使用20个字节。

Java（JDK 10），204字节

警告：覆盖所有Java程序为您的用户名存储的所有首选项！

存储，94字节：

interface S{static void main(String[]a){java.util.prefs.Preferences.userRoot().put("",a[0]);}}

在线尝试！

检索110个字节：

interface R{static void main(String[]a){System.out.print(java.util.prefs.Preferences.userRoot().get("",""));}}

在线尝试！

java S foo
java R
foo

通过将输入作为arg并将其存储在java.util.prefs提供的用户首选项后备存储中，可以工作。它会覆盖用户的根节点，以在命名节点时节省一个字节。如果要进行非破坏性测试，请使用一次性用户名运行它，或将密钥从“”更改为节点名称。

C＃，157字节

设置74字节

class P{static void Main(string[]a){System.IO.File.WriteAllLines("a",a);}}

获取83字节：

class P{static void Main(){System.Console.Write(System.IO.File.ReadAllText("a"));}}

-1字节归因于VisualMelon
-2字节归因于LiefdeWen

Perl 5，48 26 23字节

写20 + 1（-n）个字节

-3字节归功于mob

open f,">>f";print f

我实际上不确定这一点，但符合标准。对于过去的条目，仅计算了cli选项，所以这就是我要处理的内容。

读取，0 + 2字节

perl -pe "" f

附件，23 + 16 = 39字节

只需将STDIN写入文件A，然后读取文件A。

store.@：

$A&FileWrite!AllInput[]

retrieve.@：

Echo!FileRead!$A

测试中

C:\Users\conorob\Programming\attache (master -> origin)
λ echo testing | attache store.@

C:\Users\conorob\Programming\attache (master -> origin)
λ attache retrieve.@
testing

Lua，57 53 51字节

存储，27字节

io.open("x","w"):write(...)

检索，24个字节

print(io.open"x":read())

红宝石

存储 （24个字节）

File.write('a', ARGV[0])

检索 （16个字节）

p File.read('a')

C（Unix / GNU），23 + 23 = 46字节

存储，27 23字节

main(){system("dd>f");}

检索27 23字节

main(){system("dd<f");}

这基本上将jofel的答案包装到C程序中。

注意：这些dd命令stderr会将一些统计信息输出到，因此，当您在shell中天真地运行它时，您将看到一些其他输出。然而，由于面临的挑战只是说存储的字符串必须提交上stdout，不stderr，我认为它是允许有额外的输出stderr...无论如何，抑制stderr输出是如更换容易dd用cat，增加的字节数两个程序各一个。

PHP，26 + 1 + 21 = 48字节

Store.php：

<?fputs(fopen(s,w),$argn);

用运行echo <input> | php -nF Store.php。

Retrieve.php：

<?=fgets(fopen(s,r));

用运行php -n Retrieve.php。

C（gcc），77 67 + 25 = 92字节

在我的gcc上仅编译了一些警告。

store.c

#include<stdio.h>
main(int c,char**v){fputs(v[1],fopen("f","w"));}

可能可以打入包含，但我不知道如何。Segfaults，如果您不传递任何内容，而是传递任何内容。

彼得·科德斯（Peter Cordes）：-1

读

main(){system("cat f");}

批处理-11字节

%12>f
type f

输入作为命令行参数接收，并在中保留（由于CMD尝试执行参数，因此在执行尝试时会创建错误消息）f。

批处理-7字节（非竞争性）

'>%1
dir

文件名中有很多无效字符，因此这对于某些字符串不起作用，但这实际上将任意字符保存到参数给定的文件名中。要读取它，它仅列出目录中的所有文件，包括我们的字符串。