| Paste number 22082: | borkfuck2c.pl |
| Pasted by: | leeg |
| When: | 18 years, 8 months ago |
| Share: | Tweet this! | http://paste.lisp.org/+H1E |
| Channel: | #opendarwin |
| Paste contents: |
#!/usr/bin/perl -w
use strict;print "#include <stdio.h>\n#include<stdlib.h>int main(void){int *p=malloc(30000*sizeof(int));";while(<STDIN>){chomp;s/bork/++p;/;s/börk/--p;/;s/børk/++*p;/;s/bôrk/--*p;/;s/bórk/putchar(*p);/;s/bòrk/*p=getchar();/;s/bºrk/while(*p){/;s/brk/}/;print;}print "return 0;}";
This paste has no annotations.