Recent public codes are listed below. You can filter them by the following programming languages:
- view
- All
- Ada
- Assembler
- Assembler
- AWK (gawk)
- AWK (mawk)
- Bash
- bc
- Brainf**k
- C
- C#
- C++
- C++0x
- C99 strict
- CLIPS
- Clojure
- COBOL
- COBOL 85
- Common Lisp (clisp)
- D (dmd)
- Erlang
- F#
- Factor
- Falcon
- Forth
- Fortran
- Go
- Groovy
- Haskell
- Icon
- Intercal
- Java
- JavaScript (rhino)
- JavaScript (spidermonkey)
- Lua
- Nemerle
- Nice
- Nimrod
- Objective-C
- Ocaml
- Oz
- Pascal (fpc)
- Pascal (gpc)
- Perl
- Perl 6
- PHP
- Pike
- Prolog (gnu)
- Prolog (swi)
- Python
- Python 3
- R
- Ruby
- Scala
- Scheme (guile)
- Smalltalk
- SQL
- Tcl
- Text
- Unlambda
- VB.NET
- Whitespace
-
1
BEGIN { FS = [&] } ; { print $0 }
-
1 2
BEGIN { RS = "\n" } { FS = "&" } { OFS = "|"} { print $0 }
-
1 2 3 4 5 6 7 8 9
DATA SEGMENT A DW 12H B DW 23H DATA ENDS ASSUME CS: CODE,DS:DATA CODE SEGMENT START :MOV AX,DATA MOV DS,AX
...
-
1 2 3 4 5 6 7 8 9
BEGIN { BASEDATE="2011 02 02" ; DIW="Sun" ; BEF="2" ct=BASEDATE " 00 00 00" ct=mktime(ct) while (strftime("%a",ct) != DIW) { ct-=24*60*60 } ct-=BEF*24*60*60 print strftime("%Y-%m-%d %a",ct) }
-
1
-. ....- ---.. ..--- ....- .-.-.- ...-- -.... .---- . ----- .---- ----- ----- ----- .-.-.- ---.. ----- .---- .... .. -. .-- . .. ... -.. --- ... . -.--.- --- -... . -. .-. . ---- - ... .-.. .. -. -.- ... -.--.- ..-. ..-- .... .-. - . ..- ---- --.. ..- -- ..-. .. -. .- .-.. .-.-.-
-
1 2 3 4 5 6 7 8 9
# include <stdio.h> # include <math.h> int main() { double n; double s; int i = 0; int flag = 0; scanf("%lf",&n);
...
-
1 2 3 4 5 6 7
{ num = $1; if(num == 42) exit; else printf("%d\n", num); }
-
1 2 3 4 5 6 7
{ getline n x=1 b=2 x++ print $n }
-
1
printf("Helloworld");
-
1 2 3 4 5 6 7 8 9
BEGIN { OFS = " & " } NR == 1 || $0 ~ "^$" { next } NR == 2 { for (i=1;i<NF;i++) { printf("%-2s%s",$i,OFS) } printf("%s %s\n",$NF," \\\\") next } { for (i=1;i<NF;i++) { printf("%2i%s",$i,OFS) } printf("%2i%s\n",$NF," \\\\") }
-
1 2 3 4 5 6 7 8 9
#include<stdio.h> void main() { int i; int n; int fact; fact=1; printf("ENTER A NUMBER WHOSE FACTOTIAL TO BE FIND"); scanf("%d",&n);
...
-
1 2 3 4 5 6 7
{ num = $1; if(num == 42) exit; else printf("%d\n", num); }
-
1 2 3
{ printf("GEEK-O-CODE"); }
-
1 2 3
{ printf("GEEK-O-CODE"); }
-
1
echo | awk '{print "GEEK-O-CODE"}
-
1 2 3 4 5 6 7 8
BEGIN{ getline while($0!=42) { print $0 getline } }
-
1 2 3 4 5 6 7
BEGIN{ getline while($0!=42) { print $0 } }
-
1 2 3 4 5 6
BEGIN{ while(getline!=42) { print $0 } }
-
1 2 3 4
BEGIN{ getline print $0 }
-
1 2 3 4
BEGIN{ getline print $0 }
-
1 2 3
BEGIN{ 7+8 }
-
1 2 3 4 5
BEGIN{ print sqrt(16); print sqrt(0); print sqrt(-12); }
-
1 2 3 4 5
{ getline tmp print tmp print $0 }
-
1 2 3 4
{ getline temp print $0 }
-
1 2 3 4
{ getline temp print temp }
-
1 2 3 4 5
{ while(getline tmp != 42) {print } }
-
1 2 3 4 5 6 7 8 9
{ getline tmp while(tmp!=42) { print getline tmp } close(tmp) }
-
1 2 3 4 5 6 7 8 9
{ getline tmp while(1) { if(tmp!=42) {print getline tmp} else close(tmp) }
-
1 2 3 4 5 6 7
{ getline tmp while(temp!=42) { print tmp getline tmp } }
-
1 2 3 4 5 6 7
{ getline tmp while(temp!=42) { print tmp } }


