ソースコードと完全に同じ文字列を出力する

$_=q{                   q[
     *  *       *  *
   *      *   *      *
  *         *         *
  *                   *
   *   Hello Quine   *
    *               *
      *           *
        *       *
          *   *
            *
]; print"\$_=q{$_};eval\n"};eval

1

2

3

4

5

6

7

8

9

10

11

12

$_=q{ q[

* * * *

* * *

* *

* Hello Quine *

* *

*

]; print"\$_=q{$_};eval\n"};eval

$ perl quine.pl
$_=q{                   q[
     *  *       *  *
   *      *   *      *
  *         *         *
  *                   *
   *   Hello Quine   *
    *               *
      *           *
        *       *
          *   *
            *
]; print"\$_=q{$_};eval\n"};eval

1

2

3

4

5

6

7

8

9

10

11

12

13

$ perl quine.pl

$_=q{ q[

* * * *

* * *

* *

* Hello Quine *

* *

*

]; print"\$_=q{$_};eval\n"};eval

#define quine(x) main(){return puts(#x"\nquine("#x")");}
quine(#define quine(x) main(){return puts(#x"\nquine("#x")");})

1 2	#define quine(x) main(){return puts(#x"\nquine("#x")");} quine(#define quine(x) main(){return puts(#x"\nquine("#x")");})

$ gcc -o quine quine.c
$ ./quine
#define quine(x) main(){return puts(#x"\nquine("#x")");}
quine(#define quine(x) main(){return puts(#x"\nquine("#x")");})

1

2

3

4

$ gcc -o quine quine.c

$ ./quine

#define quine(x) main(){return puts(#x"\nquine("#x")");}

quine(#define quine(x) main(){return puts(#x"\nquine("#x")");})

C言語でbuffer overrun

Qt5で始めるGUIプログラミング

C言語で簡易メモリ管理