挑战

编写一个程序，输出Hello World, from line X!，其中X是源代码中实际打印语句本身的行号。

规则

• 在这种情况下，我们希望将输出字符串的语句的第一行号显示到stdout
• 您应该避免简单地在源代码中搜索字符串（文件或quine）来查找行号
• 如果将任何其他空格或语句（不会中断代码流）添加到源代码，则应在运行时（如果适用，在编译之后）反映出来。

推荐建议

如果由语言提供，则可以使用异常/堆栈跟踪来实现此目标。尽力使用可跨不同系统/实现移植的代码，但请注意，这不是必需的。__LINE__不鼓励使用定义的变量，例如，尽管规则允许。

赢家

• 这是一场人气竞赛（于2014年6月10日结束），将根据当时的当前投票来宣布社区投票最高的答案

• 投票时，请考虑某人的答案的创造性，详尽程度或趣味性。以及所使用的编程语言的困难/限制

辛克莱基本

10 PRINT "Hello world, from line ";PEEK 23621;"!"

世界十号线您好！

PEEK通过在存储当前行号的地址处输入地址，此方法将适用于任何行，因此以下内容也将适用：

341 PRINT "Hello world, from line ";PEEK 23621;"!"

世界，您好，来自341行！

基本知识

我认为这可以完成所有要求的工作：

10 PRINT "Hello World, from line 10!"

爪哇

public class Hello{
    public static void main(String[] args) {
        System.out.println("Hello World, from line "+new Exception().getStackTrace()[0].getLineNumber()+"!");
    }
}

佩尔

close STDERR;
open FOOBAR,">",\$_;


print!warn,'Hello World, from line ',/(\d+)\.$/,'!';

不像using那样短__LINE__，但是也许更有趣。

warn是一种调试工具，它向发出语句STDERR，指示在哪个文件以及在哪一行上发出了警告... 除非 STDERR先前已关闭或无法访问，否则将对最近打开的文件发出警告处理-这是未记录的行为。我不确定将其归类为功能还是错误。

在这里，STDERR被关闭，标识为的新文件句柄FOOBAR被打开，并被路由到变量$_。然后对其进行解析以检索警告的行号，该行号嵌入在print语句中。

C ++

#include <iostream>
#include <utility>
#include <type_traits>

#define __(A,B,C,...) B##C##A
#define _(A,...) __(__VA_ARGS__, A)
template<unsigned...Is> struct v;
template<unsigned I0, unsigned... Is> struct v<I0, Is...>:v<I0-1,I0-1, Is...> {};
template<unsigned...Is> struct v<0,Is...>:std::integral_constant<unsigned, sizeof...(Is)> {};

int main() {
  std::cout << "Hello world from line " << v<_(EXTRACT,_(Q,_,E,_,$$main$$,),_(@22,,_,_),_(Z,N,L,I,_,,L),__STACK_TRACE__)>::value << "\n";
}

现场例子

a

print("Hello world, from line "..debug.getinfo(1).currentline.."!")

C＃

C＃5.0 [CallerLineNumber]可以解决问题：

using System;
using System.Linq;
using System.Runtime.CompilerServices;
namespace LineNumberConsole
{
    class Program
    {
        public static void Main()
        {
            Console.WriteLine("Hello World, from line {0}!", ToRoman(GetLineNumber()));
            Console.ReadLine();
        }

        private static int GetLineNumber([CallerLineNumber] int sourceLineNumber = 0)
        {
            return sourceLineNumber;
        }

        private static string ToRoman(int number)
        {
            // TODO: Copy some source code from http://pastebin.com/w0hm9n5W
            // Skipped here for brevity
            return number.ToString();
        }
    }
}

输出量

Hello World, from line X!

C

#include <stdio.h>
main(){
printf("Hello World, from line %d!", __LINE__);
}

蟒蛇

示例（10行，213个字符）：

import sys
import traceback
lineno = None
while True:
    try:
        print 'Hello World, from line %d!' % lineno
        break
    except:
        lineno = traceback.tb_lineno(sys.exc_info()[2])
        continue

在这里尝试在线。可以添加非流更改代码和空格，程序将显示更新的行数，同样，此代码段也可以在现有程序中的任何位置使用。预期产量：

Hello World, from line 6!

另一个示例（在此处尝试在线）显示添加代码/空格后它可以工作。预期产量：

Down we go...
Gotta catch 'em all.
Down we go...
Hello World, from line 11!
Awesome!

Java脚本

function getLine(n) {
   try {
      to
   } catch (dat) {
      var stack = dat.stack.split('\n');
       for (var i = 0; i < stack.length; i++) {
           if (~stack[i].indexOf ('getLine')) break;          
       }
      return dat.stack.split ('\n')[i + ~~n].match (/:(\d+)/)[1] - ~~window.hasOwnProperty ('__commandLineAPI')
   }
}
//Line 12
console.log ('Hello World, from line ' + getLine(1) + ' !')

注意：从chrome开发人员控制台中评估的表达式将包装在一条with语句中。因此，如果是这种情况，我们需要将行减一

Python 3

import hashlib
with open(__file__) as f:
    line_num = 0
    for line in f.readlines():
        line = line.rstrip() # make it work with or without newline at the end
        line_num += 1
        if hashlib.sha256(bytes(line, "UTF-8")).hexdigest()[0:6] == 'cc46f7':
            print('Hello world, from line {}!'.format(line_num)) # cc46f7

世界八号线您好！

此自读代码包含一个自引用哈希。最后一行的SHA256和（以开始的空白而没有尾随的空白）开头 cc46f7...。当对print行进行哈希处理时，它会发现哈希值与所搜索的魔术值匹配。

GNU COBOL

好吧，他们说这不可能完成。实际上，是我说无法完成。现在已完成，并使用所应用的方法重新实现了过时的语言功能。

问题指出：

如果将任何其他空格或语句（不会中断代码流）添加到源代码，则应在运行时（如果适用，在编译之后）将其反映出来。

的东西任何量可以前三个插入DISPLAYS的引起输出的开始，和任何后的DISPLAY s都会“中断代码流”，所以可以。

COBOL曾经有一个TRACE动词（语句），该动词仅在执行时列出源行号（无法访问程序中的行号）。尽管用途有限，但我包含了TRACE的实现。

   ID Division.
   Program-ID. HIWHERE.
   ENVIRONMENT DIVISION.
   configuration section.
          source-computer. TinkerToy with debugging mode.
   Procedure Division.
   Declaratives.
   Debug-Declaratives Section.
       Use For Debugging on a b
       .
   Debug-Declaratives-Paragraph.
       Display Debug-Line "!"
       .
   End Declaratives
       .
   Main-Program Section.
       DISPLAY "Perform"
       Display "Hello World, from line " no advancing Perform b
       display "GO TO"
       Display "Hello World, from line " no advancing GO TO a
       .
   a.
       dISPLay "Fall through"
       Display "Hello World, from line " no advancing. b.
   The-Last-bit-OF-the-PROGRAM.
       GOBACK
       .

输出是

Perform
Hello World, from line     18!
GO TO
Hello World, from line     20!
Fall through
Hello World, from line     23!

为了展示编写语言的能力和灵活性，本示例同时使用了混合大小写，完全小写和完全大写的形式。没关系，因为在处理时，所有内容都“折叠”为大写。

从正在运行的程序中获取正在运行的程序中源行号的唯一标准COBOL方法是使用DEBUGGING DECLARATIVE。在此类声明的a SECTION内（严格在a内的一段内）SECTION，您可以访问特殊寄存器DEBUG-LINE。它包含动词（语句）的源行号，该动词导致将控制权转移到特定的过程名称（段落或SECTION）。

因此，使用PERFORM，或GO TO，或“掉线”将SECTION执行调试声明中的段落。

好的但是 DISPLAY不会导致控制权的转移。

没问题。将其与控制权转移放在同一行。

问题在于，如果“将任何其他空格或语句（不会中断代码流）添加到源代码中，则应在运行时（如果适用，在编译之后）将其反映出来”。

因此，将其放在同一行上但在控制权转移之前，将其内容DISPLAY分成两部分（请记住，“在这种情况下，我们希望显示输出字符串的语句的第一行号” ）并在控制权转移之前输出第一部分，第二部分则从DEBUG-LINE在调试过程中。

最后一个棘手的地方是“掉线”（可以PERFORM编辑“过程” ，可以是a的目标GO TO，也可以简单地通过下一行输入）。在这种情况下，将放到DISPLAY 定义过程的行上，但在定义的前面。

“过程”（a和b）的名称已被严格缩短，以使它们可以与放在同一源代码行中DISPLAY。严格来说，COBOL过程名称应从第8列到第11列之间的某个位置开始。但是，如今的语法对此要宽松得多。在某种程度上，我可以在与某些代码相同的行上定义过程名称。甚至嵌入到代码中。需要保养，偶尔需要停止。

在显示的PROCEDURE DIVISION每个句号中，是必需的，不再需要。

编译：

cobc -x -g hiwhere.cbl

要执行（Linux）：

COB_SET_DEBUG=Y ./hiwhere

最后，返回TRACE（没有READY / RESET）。

   ID Division.
   Program-ID. tRacE.
   ENVIRONMENT DIVISION.
   configuration section.
          source-computer. TinkerToy with debugging mode.
   Procedure Division.
   Declaratives.
   Debug-Declaratives Section.
       Use For Debugging on a
       .
   Debug-Declaratives-Paragraph.
       Display Debug-Line
       .
   End Declaratives
       .
   Main-Program Section.
  *    Just append "perform a" to a single-line statement.
       DISPLAY "1" . perform a
       Display "2" . perform a
       display "3" . perform a
  *    Or prepend "perform a." for a multi-line statement, or a
  *    statement which won't "come back". 
       perform a. GOBACK
       .
   a.
       CONTINUE
       .

输出为：

1
    17
2
    18
3
    19
    20

其中三个DISPLAY语句输出1、2和3，17、18、19和20是“可执行”（非调试）行的行号。

爪哇

使用Exception的堆栈跟踪行为来获取当前行。只要不将Printstatement分成多行，或者将classfile弄乱，它应该可以工作

public class PrittLnbr
{
    public static void main(String[] args)
    {
        System.out.println("Hello World, from line "+new Error().getStackTrace()[0].toString().split(":")[1]+"!");
    }
}

蟒蛇

import traceback, inspect
frame = inspect.currentframe()
print("Hello World, from line "+traceback.format_stack(frame)[0].split()[3][:-1]+"!")  

佩尔

print 'Hello World, from line '.__LINE__.'!';

爪哇

public class HelloFrom {
    public static void main(String[] args) {
        System.out.println("Hello World, from line " + Thread.currentThread().getStackTrace()[1].getLineNumber() + "!");
    }
}

蟒蛇

import inspect
print ("Hello world from line %d!" % (inspect.getlineno(inspect.currentframe())))

输出量

Hello World from line 2!

Befunge

做只是为了好玩。

>00g1+:00p"v"\10v  
    v-*45g00p\g <  
#v+1_$10g1vv,,,,<  
^<p000p01+<#>,,,^  
>" enil morf ,oll"v
@.,,,,,,,,,<^,"He"<

有条件的：代码的左上角必须为0 <x <20和0 <= y <62; 并且前两个单元格必须为空。

例：

                         v                  

                         0                  
                         0                  
                         0                  
                         p                  
                         0                  
                         1                  
                         0                  
                         p                  
                         >00g1+:00p"v"\10v  
                             v-*45g00p\g <  
                         #v+1_$10g1vv,,,,<  
                         ^<p000p01+<#>,,,^  
                         >" enil morf ,oll"v
                         @.,,,,,,,,,<^,"He"<

将输出：

你好，从第10行

C

通过使用可变参数宏，我们可以创建一个打印函数，该函数自动将行号添加到任意printf语句的末尾，并始终打印到stdout。

test.c：

#include <stdio.h>

#define printfl(format, ...) fprintf(stdout, format " From line %d\n", ##__VA_ARGS__, __LINE__)

int main() {
    printfl("Hello World! I have %d argument(s).", 1);
    return 0;
}

输出：

% ./test
Hello World! I have 1 argument(s). From line 6

注意：我偏离了模式，以证明printfl仍然是有效的可变参数函数。如果您真的关心输出的格式，则可以随时更改我使用的文字。

重击

#
# some comments to fill some lines...
#
echo "Hello World, from line $LINENO!"

输出量

Hello World, from line 4!

d

void main ()
{
    import std.stdio;
    writefln("Hello World, from line %d", __LINE__);
}

C或C ++和AWK

lineno.c：

// code or comments
// ....
#error Hello World, from line
// other code or comments

用法：

gcc lineno.c 2>&1 | awk '{ split($0,a,":"); ; printf("%s %s!\n", gensub(".*#error ","",1), a[2]); exit; }'

输出：

您好，世界，从3号线

笔记：

• 没有用户编写的代码搜索该文件。
• g ++将在c ++文件上工作。

在Ruby中有点无聊：

puts "Hello World, from line #{__LINE__}!"

这不是作弊吧？

Java脚本

使用堆栈跟踪的一行。

(function (o) { console.log("Hello World, from line " + (Error.captureStackTrace(o) || o.stack.match(/\d+/)[0] - !!__commandLineAPI) + "!"); })({});

眼镜蛇

class Program
    def main
        print 'Hello World, from line [System.Diagnostics.StackFrame(true).getFileLineNumber]!'

红宝石

File.write "hello.rb", "x=2\n"+"x+=1\n"*rand(rand(100))+'puts "Hello World, from line #{x}!"'
system "ruby hello.rb"
File.delete "hello.rb"

电源外壳

便宜的举动

Function LemmeGetDatError() {
    "Too busy chuggin along"
    "Then all of a sudden, I meet a new programmer"
    "And he's all like"
    Write-Output "$(Try {"Hello World from"; Throw "error" } Catch {$_.ScriptStackTrace.Split(":")[1]})"
}

LemmeGetDatError

电源外壳

$l=(Get-PSCallStack | ForEach{$_.Location})[0].split(' ')[-1]; "Hello World, from line $l!"

和：

try{ I AM ERROR. } catch { $l=$error[0].InvocationInfo.ScriptLineNumber; "Hello World, from line $l!" }

两者都是这样的：

PS C:\MyFolder> .\helloworld.ps1
Hello World, from line 1!

蟒蛇

import traceback

print 'Hello World, from line %i!' % traceback.extract_stack()[0][1]

简短而甜美。

佩尔

另一个Perl：

use warnings;

$SIG{__WARN__} = sub { ($line = shift) =~ s/\D//g; };

$x=$x+1; print "Hello World, form line $line!\n";