Arch is the best! Implementations.

1. Home
2. Implementations
3. Translations
4. Merchandise
5. Submit

1. ADA (1)
2. ASP (0)
3. Assembler (All Variants) (2)
4. AWK (1)
5. B (1)
6. BASIC (4)
7. Befunge (1)
8. Bengali (0)
9. Brainfuck (1)
10. C (3)
11. C++ (4)
12. CASIO-BASIC (2)
13. COBOL (1)
14. Common Lisp (1)
15. D (2)
16. E (1)
17. Emacs Lisp (1)
18. Erlang (1)
19. Firefox (1)
20. FreePascal (1)
21. Haskell (1)
22. Java (2)
23. LOLCODE (1)
24. Lua (1)
25. Lush (2)
26. Perl (2)
27. PHP (2)
28. Piet (1)
29. PKGBUILD (2)
30. Postscript (1)
31. Pseudocode (1)
32. Python (5)
33. Rexx (2)
34. Ruby (2)
35. Ruby on Rails (0)
36. Shellscript (7)
37. SPL (1)
38. SQL (2)
39. Tcl (1)
40. TeX (2)
41. Thue (0)
42. TI-BASIC (2)
43. Visual Basic (1)
44. Visual Basic.NET (1)
45. Whitespace (1)

Perl

#!/usr/bin/perl
print "Arch is the best!\n";

#!/usr/bin/perl
@iabt=("si","hcrA","tseb","eht");for($i=0;$i<2;$i++){push(@iabt,shift(@iabt));}@iabt=reverse@iabt;$okaythisisthelastvariableusedinthisscriptofabsouluteuselessfunctionalitythisscriptcouldvebeencodedjustbymodifyingasimplehelloworldprogramsowhyamidoingitthehardwayidontknowbutwritingthisoverlongvariableisprettyfunyoushouldtrythissomewhentoo=0;foreach(@iabt){$_=reverse scalar$_;if($okaythisisthelastvariableusedinthisscriptofabsouluteuselessfunctionalitythisscriptcouldvebeencodedjustbymodifyingasimplehelloworldprogramsowhyamidoingitthehardwayidontknowbutwritingthisoverlongvariableisprettyfunyoushouldtrythissomewhentoo==3){print$_."!\n";exit 0;}print $_." ";$okaythisisthelastvariableusedinthisscriptofabsouluteuselessfunctionalitythisscriptcouldvebeencodedjustbymodifyingasimplehelloworldprogramsowhyamidoingitthehardwayidontknowbutwritingthisoverlongvariableisprettyfunyoushouldtrythissomewhentoo = $okaythisisthelastvariableusedinthisscriptofabsouluteuselessfunctionalitythisscriptcouldvebeencodedjustbymodifyingasimplehelloworldprogramsowhyamidoingitthehardwayidontknowbutwritingthisoverlongvariableisprettyfunyoushouldtrythissomewhentoo + 1;}