REBOL en action‎ > ‎

One-liners



Section en cours de construction...

REBOL One-liners sont les Haiku de la programmation REBOL...
Dans la langue de Molière, on pourrait le traduire par :
"Avec REBOL, regardez ce que l'on peut faire en une ligne !"
 
Les règles sont simples :

  • 132 caractères maximum
  • directement exécutable depuis la console REBOL
  • mode console ou mode View avec interface graphique !

1 - Imprimer le source d'une page Web

print read http://www.rebol.com

Résumé:Très simple. Affiche sur la console le source HTML d'une page Web.
Auteur(s):RT
Longueur:31 caractères

2 - Ouverture d'une fenêtre qui permet d'envoyer le code HTML par email

view layout [u: field "user@rebol.com" h: field "http://" btn "Send" [send to-email u/text read to-url h/text alert "Sent"]]

Résumé:This example opens a window that displays a GUI form. You can input an email address and a web page URL. REBOL then sends the contents of that web page to that email address. Note that you must have your SMTP email configured in REBOL (in View's User preferences).
Auteur(s):Carl Sassenrath
Longueur:125 caractères


3 - FTP upload all files

foreach file load %./ [if not dir? file [write/binary join ftp://user:pass@example.com/ file read/binary file]]

Summary:Uploads all the files in a directory using FTP. Files can be text, images, web pages, anything... but not directories.
Author(s):RT
Length:111 characters


4 - TCP port scanner

repeat n 100 [if not error? try [close open probe join tcp://localhost: n] [print [n "is open"]]]

Résumé:This is a simple port scanner. Given a TCP address, it will tell you which of the first 100 ports are accessible. The address can be a host name or number. The localhost name will scan ports on your own machine. You can scan more ports by increasing the number (from 100), or you can scan ranges by using a FOR loop rather than REPEAT.
Auteur(s):Anonyme
Longueur:98 caractères