单行小程序

✍ dations ◷ 2025-02-23 19:44:49 #计算机编程

单行小程序(One-liner program)是不多于一行的电脑程序或表达式。它常被用来展示编程语言在不同范畴的表达能力。实际上,单行小程序常被直接地从命令线输入和运行。Perl是一种优秀的用来创造单行小程序的语言。许多单行小程序是实用的,例如以下perl单行小程序将反转文件中的所有字节:

perl -0777e 'print scalar reverse <>' filename

单行小程序经常用来展示编程的能力。经常有看谁能创造最好的单行小程序的比赛。

99瓶啤酒计算机程序单行小程序的例子:

   perl -e '$b="of beer";$w="on the wall";print "$_ ",b($_)," $b $w\n$_ ",b($_)," $b\ntake one down, pass it around, ",$_-1," ",b($_-1)," $b $w\n\n" foreach (reverse 1..99);sub b{$x="bottle";$_==1?$x:$x."s";}'

一个剪刀石头布游戏单行小程序:

 perl -e '$c=(($r,$s,$p)=qw|rock scissors paper|);$|=0;until($y=~/^($r|$s|$p)$/){print "$r, $s or $p? ";$y=<>;chop $y};%r=($s,{$p,1,$r,0},$p,{$r,1,$s,0},$r,{$s,1,$p,0});print "You: $y\nCom: $c\nYou ".((exists $r{$y}{$c}?($r{$y}{$c}?"Win":"Lose"):"Draw")."\n")'

Perl不是唯一一个能写出单行小程序的语言。以下是显示输入的内容的ASCII码的C程序:

相关

  • 亚种亚种(subspecies)是指虽属同一物种但种内彼此占据地理分布或宿主互不重叠且生殖隔离不完善,彼此具有一定形态差异的生物类群。亚种名与种加词相同的亚种被称为指名亚种,亦称原名
  • 杰拉杰拉(Gela)是卡尔塔尼塞塔省的一个镇,位于意大利的西西里岛。杰拉是卡尔塔尼塞塔省的一个城市,在意大利的西西里岛南部。它位于地中海上,距卡尔塔尼塞塔大约有84公里。2001年约有
  • 芳堤娜城堡芳堤娜城堡(Château Frontenac)也称芳堤娜古堡酒店,座落于加拿大魁北克市圣劳伦斯河北岸,是加拿大太平洋铁路公司建于19世纪末的一系列古堡大饭店之一,用作招俫旅客。芳堤娜城堡
  • 中子衍射技术中子衍射技术是研究晶体学的方法,用来确定某个材料的原子结构或磁性结构。这也是弹性散射的一种,离开中子具有入射中子相同或略低的能量。这个技术与X射线衍射法类似,其主要差
  • 万汗王台王台(?-1582年),本名万(满语:ᠸᠠᠨ,转写:Wan),那拉氏,塔山左卫都督克什纳长子彻彻穆之子,哈达部长王忠之侄,又称“万汗”(满语:‍ᠸᠠᠨᡥᠠᠨ,转写:Wanhan)。王台早年居于绥哈城。因王忠部下
  • 溪州牌台糖溪州牌内燃机车,是台湾糖业公司所拥有的液力传动式内燃机车。现已全数停用。溪州牌内燃机车是台糖购入的第二种内燃机车。台糖于1956至1957年以美援资金向位于美国宾夕法
  • 龙口龙口市,旧称黄县,雅称芝阳,为中国山东省下辖县级市,由烟台地级市代管。龙口为山东省综合实力最强的县市,其综合竞争力2010年列全国百强县(市)第七位。该市地处胶东半岛西北部,渤海湾
  • 希腊教育希腊基本教育体系分为3级,即初等教育、中等教育、高级教育。初等教育分为2个阶段,学前教育与初等教育。希腊幼儿园学习时间一般为1年至2年。小学学习时间为6年。中等教育分为
  • 非对称非对称(英语:Asymmetry),或称不对称,是对称的不存在或违反对称。无论在实体或抽象系统中,非对称都是一个重要属性,它在不同学科领域中可以用更为精确或优美的术语来指代。人为制造
  • 伊斯之伟大种族伊斯之伟大种族(英语:Great Race of Yith)是克苏鲁神话中的虚构种族,最早出现在霍华德·菲利普·洛夫克拉夫特于1934年发表的短篇小说《超越时间之影(英语:The Shadow Out of Time